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INE DIAGNOSTICS THAT ORE 
THAT IF AN 
BE DETECTED 


ING THAT 
IMMEDIATE TO PROBLEM 
TICS MAY BE ADDED IN THE FUTURE. 


SUREENTLY THERE 
0 SE RUN IN SEQUENC 
ERROR SGU OCCUR I 


z 
a 


So ww &' Zhe 


ees 


DI- 
OmunN =. 


D414 
2mm 
Gow 
444 
an a 
OTs 


INTERUPT TEST 

ER TRANSMITTER EXERCISER TEST 
MISC. RX AND TX TESTS. PLUS BCC TESTS. 
- CHARACTER DETECT TESTS. . 
CHARACTER LENGTH AND INTERRUPT TESTS. 


LSO.AN ONLINE TEST TO BE DISCUSED LATER. 
(REV) ONLINE TEST. (ITEP OVERLAY) 
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EQUIPMENT 
ANY POPLI FAMILY CPU (WITH MINIMUM 4K MEMORY)-NITH 
OR KITHQUT A HAROMARE SUITCH REGISTER (LOC. 177870) 

gS 33. (OR EQUILIVALENT) 

SYNC MODEM (ONLY REQUIRED FOR ONLINE TEST) 

STORAGE 

PRO 


a | WILL LOAD AND RUN 
F MEMORY. 


PSCATION 1400 THRU 1600 ARE Seer ioeny TO 


NOTED AND TO BE ee BY _OPERR 


AFTER 0911 TRIAL PROGRAM HAS BEEN EXECUTED. 
OR AFTER THE “AUTO SIZING” HAS BEEN DONE. 


LOADING PROCEEDURE 


METHOD 

ALL PROGRAMS ARE IN ABSOLUTE FORMAT SND 
ARE LOADED USING THE ABSOLUTE LOADER. 
ABSOLUTE LOADER STARTING ADDRESS #500 
MEMORY # 

346 

4K 17 

ax 37 

12K $7 

1&K av 

20K 117 

23K 137 

28K 157 


LOAD THE ADDRESS OF ABS. LOADER (LOC. XxxxS00) 
THEN START 


STARTING PROCEEOCURE 


- LOAD LOC. 200 

. SET SWR TO ZERO FOR “AUTO SIZING” OR LEAVE 
LEAVE SWR BIT 7=1 TO USE EXISTING PARAMETERS SET 
WY Na titer tee pscra 4 A PREVIOUSLY RUN DQ11 SIRGNOSTIC 


S 
boa TQ SECTION 4.1 FOR SOFTWARE SWITCH REGISTER OPERATION 


oP 
NOT E: THE SOF TARE SUITCH REGISTER IS LOCATED AT LOC.176 
SOFTWARE DISPLAY REGISTER IS LOCATED AT LOC.174 
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C. THEN START 
if. PRO yr WILL _TYPE MGINDEC NAME AND PROGRAM NAME 
IF THIS WAS THE FISST START UP OF THE PROGRAM) AND ALSO 
THE FOLLOVENa: 
"MAP OF DQ11 STATUS” 
1409 

















TOAB TNCTHE- PROGRAM. TH ee TeBGe tees VERT PyéD gy THE 
ieee TF AUTO cisiNe 19 BONE. “Por TRE ORNET TION 5 OF iit 
TABLE SEE SECTION 8.4 FOR HELP 


— THE SOF TW W Ls REGISTER CTED TH N T FOLLOWIN 
ee TiPeD Wai re Pa Seen ibentTFies Seen 
FOR cPeRatog” 5 9 4 tate 


SRK USING THE SOFTHARE SUITCH REGISTER WHEN A HA 
SHITCH REGISTER IS AVAILABLE THE PROGRAM WILL NOT 


THE PROGRAM KILL TYPE “R™ 
AND PROCEED TO RUN THE DIAGNOSTIC 


4.1 CONTROL SWITCH SETTINGS 
DS crease 

REGIS M3 re. A SOFTWARE SWITCH REGISTER IS USED WH 
ITCH OPTIONS AS THE hice. SW 


IF T HE HARDLIA 2 
AND IT hh aaa SLL Phe aeat? 7) THEN THE SSE THBRE § 


CONTROL: 

THIS PROGRAM ALSO SUPPORTS THE DYNAMIC LOADING OF THE SOFTWARE SWITCH 
REGISTER (LOC. 176) FROM THE TTY. THIS CAN BE ACCOMPLISHED BY 

DOING THE FOLLOWING: 


L) TYPE CONTROL G <1G>; THIS WILL ALLOW THE TTY To ENTER DATA INTO 
LOC. 176 AT SELECTED POINTS WITHIN THE PROGRAM 


THE ABOVE IS ONLY AN EXAMPLE! 


2) THE MACHINE WILL THEN TYPE: ees (XXXXXX IS THE OCTAL CONTENTS 
OF THE SOFTWARE SWITCH REGISTE 


2) AFTER THE *’NEW=’’ HAS BEEN TYPED THEN THE OPERATOR CAN DO ONE 
OF THE FOLLOWING AT THE TTY: 


A) TYPE A NUMBER TO BE LOADED INTO LOC. 17& FOLLOWED BY A <CR>. 
(ONLY NUMBERS BETWEEN O-7 WILL BE ACCEPTED AND ONLY & NUMBERS 
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WILL to ALLOWED) 
1 R> IS_THE FIRST KEY DEPRESSED THE SOFTWARE SWITCH 
REGISTER CONTENTS WILL NOT BE CHANGED. 


Boek 3 SON Tho y <tU> IS DEPRESSED THEN THE PROGRAM WILL SEND YOU 


SET: HALT ON ERROR 
SET: LOOP_ON CURRENT ire 







wo 
—_ 





: H ERROR AND LOOP_ON IT 
SET: ee PREVIOUS STATUS bea CLR-DO AUTO SIZE. 


QVIOOOS>-— bs 


SET: LOCK ON SELECTED TEST 
EET: RESTART PROGRAN AT SELECTED TEST 
SET: RESELECT DQ11°S DESIRED ACTIVE, 


H REGISTER RESTRICTIONS 


RESELECT DQ11°S DESIRED ACTIVE. 

FL EASE NOTE THAT A MESSAGE IS TYPED 

OUT FOR SWITCH REGISTER BEING EQUAL TO DQ11°S 
ACTIVE. THIS MEA nS IE THE BY TEN HAS 

FOUR DQ11S; BITS 00.9 

BE SET IN LOC “ oncty Ore ING 

SWITCH ALTERS THAT’ LOCATION; SHEREPORE 

IF FOUR DQ115 ARE IN THE SYSTEM 
#**DO NOT#** SET SWITCHS GREATER THAN 


oO -4 SERB? 
Oo 2 > OF TUG) CUNO ID VHO-Mw cul 
4 


& 





pM AMM ak 2 ab ab oo ob ab ob ab ab ot 2b ot ob 
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METHOD: A LOAD _ADD 
8 START WITH a 
¢ PROGRAM WIL YPE ‘ness AGE 
) ey m E BINERY aT ‘wiit DESIRED ACTIVE 
ee ae =e D011; 723 DQ11; 1724 DQ11 37=5 D911 ETC. 

E RMBe (IF “yal io} "WILL BE th DATA rads (EXCLUDING 11/ ae 11/704, 11/34) 
F CONTINUE WITH ANY OTHER SWITCH SETTINGS DESIRED. 
SW Cl 


TRONGLY se rs Be THAT 


AST y PASS HA ie Bae 


RE 
444 
ore 

mw 


i REASON BEIN 

PROGRAM HAS TO it AR — aN S t 
UP PARAMETERS. ALSO WHEN 

SELECTED ALAS" START AT THES veRY” 
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BEGINNING OF THAT TEST. 
SW OS LOOP ON CURRENT DATA: 
THIS SWITCH ae +. ante IF 


+ aon mo IS I 
ASON BEING 


OER, WITH BLOCK DF PT para 


THUS IN BLOCK DATA; ONE PATTERN CANN'T BE SINGLED OUT. 
4.1.3 SWITCH REGISTER PRIORITYS 
ERROR SWITCHES 
SW 12 DELETE PRINT QUT (BELL ON ERROR. 
SW 13 DELETE ERROR PRINT 
HALT ON THE ER ROR. 
SW O08 GOTO BEGINNING OF THE TEST. 
SW 10 GOTO NEXT TEST ON ERROR. 
¥*4HLT (ERROR) ROUTINE SUPPORTS <*G> OPERATIONS##% 
SCOPE SWITCHES 
1. SW O09 (IF ENABLED BY “SCOP1") 
2. SW 14 
3. SW il 
##**SCOPE ROUTINE WILL SUPPORT <*G> OPERATION#### 
4.2 STARTING ADDRESS 
STARTING ADDRESS IS AT 900209 
THERE ARE THER STARTING ADDRESSES 
FOR THE DQ11 DIAGNOSTICS PREVIOUSLY MENTIONED 


NOTE: The ADDRESS 000042 IS poe 0 
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2 
~ 
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AFTER #ALL# AVAILABLE 0Q11°S ARE T 
THE PROGRAM WILL RETURN TC “DOPe” OR TRACT@L1". 


.* OPERATING PROCEDURE 


WHEN PROGRAM IS INITIALLY STARTED MESSAGES AS DESCRIBED IN SECTION 
FOUR WILL BE PRINTED. 


| 

| AND PROGRAM WILL BEGIN RUNNING THE 
| DIAGNOSTIC 

| 

| 

| 

L 


5.2 PROGRAM AND/OR OPERATOR ACTION 
THE TYPICAL APPROACH SHOULD SE 


l. HALT ON ERROR (VIA SW 15=1) 
WHEN EVER AN ERROR OCCURS 
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6.3 


7.2 


é. CLEAR SW 15 
3. SET SW 14: (LOOP _ON THIS TEST) 
‘ SET SW 13; (INHIBIT ERROR PRINT OUT) 


4 
THE TEST NUMBER AND PC WILL BE TYPED OUT AND 

POSSIBILY AN ERROR MESSAGE (THIS PEER cn ON THE TEST) 
TQ GIVE THE OPERATOR AN IDEA_AS TO THE SOURCE OF THE 
PROBLEM. IF _IT IS NECESSARY TO KNOW MORE INFORMATION 


CONCERNING THE ERROR REPORT; LOOK IN THE LISTING 
FOR THaT TEST NUMBER WHICH WAS TYPED OUT 


HEN NOTE THE PC ERROR REPOR 
THIS WAY THE EXACT FUNCTIONING OF THE TEST 
CAN BE INTERPEDITED 


ERRORS 


s f Test AurGe PREVIOUSLY THERE WILL ALWAY BE 
TEST NUMSER AND agit iy ts! uy TIME OF 


OVIDING SW 2=0). IN a? MCASES ADDITIONAL 
INFORMATION WILL BE SUPPLIED THE THE ERROR MESSAGE 
tse IS TO GIVE THE OPERATOR AN INDICATION OF THE 


ERROR RECOVERY 


IF FOR net REASON THE DQ11 SHOULD 

“HANG TI! S” (GAIN CONTROL OF BUS SO T 

CONSOLE MANUAL FUNCTIONS ARE INHIBITED) BN INIT 
OR P DOWN/UP IS NECESSARY FOR OPERATOR 

TO A ae epee: of nt The 
K IN LOCATION 


IF THIS SHOULD H 
“TSTNO” (ADDRESS MUBESIFOR” THE NUMBER OF THE TEST THAT 
ee aeeeaiag AT THE TIME OF THE CATASTROPHIC 


OR. 
IN THIS WAY THE OPERATOR WILL HAVE AN IDEA AS TO 
WHAT THE DQ11 WAS DOING AT THE TIME OF THE ERROR. 


##*#HALT RECOVERY WHEN USING SOFTWARE SWITCH REGISTER*### 

IF THE SOFTWARE SWITCH REGISTER IS TO BE CHANGED AFTER A HALT 

Ly 3 THE OPERATOR IS pee TO TYPE A <tG> BEFORE DEPRESSING CONTINUE. 
FOLLOWING WILL SE TYPED: 
=XXXXXX NEW= (REFER TO SECTION 4.1 FOR OPERATOR OPTION) 


RESTRICTIONS 


_ STARTING RESTRICTIONS 
SEE SECTION 4. (PLEASE) 


OPERATING RESTRICTIONS 


pols TRIAL PROGRAM MUST me RUN PRIOR TO THE 
FIRST wT THE FI are ‘eo OF ANY DQ11 DIAGNOSTIC 


NOTE: NO PROGRAM 0 
DG11 DIAGNOSTIC WAS LOADED RFTER DQ11° TRIAL OR 
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8.1 
8.2 


8.3 


8.4 
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IF CORE MEMORY HAS NOT BEEN CHANGED;OR IF THERE 
N- CHAN n'y THe 


TS NO_0Q11 CONFIGURATION: 


"RUN AGAIN. 
E ABOV : fave ‘BEEN VIOLATED 


HOWE 
Ql PR Gna M 8 
Be kan fe aobaee uae Fu 
NOTE: AN AL TERNATIVE 2 THE ABOVE IS ATTEMPTING 
THE “AUTO SIZING” WHEN PROGRAM IS INITIALLY STARTED 


WITH SWO7=0. 
MISCELLANEOUS 
EXECUTION TIME 
PASS COMPLETE 


WHEN THE DIAGNOSTIC HAS COMPLETED 
A PASS THE FOLLOWING IS AN EXAMPLE 
OF THE PRINT OUT TO BE EXPECTED. 


END PASS DZDQE-C CSR: 160000 VEC: 300 PASSES: 000001 ERRORS: 000000 


NOTE: THE NUMBERS FOR CSR AND VEC ARE 
NOT NECESSARILY THE VALUES FOR THE DEVICE 
THEY ARE ONLY FOR THIS EXAMPLE. 

TST1 (MINI MONITOR) 


THE VERY oe “TEST” (TST1) 
ST OF 


IS #NOT# A T 


HE D@11 


HARDWARE 
IT IS A_MINI-MONITOR USED TO CYCLE DQ11 IN THE 
SYSTEM THROUGH THE DIAGNOSTIC. 


REMEMBER: TST1 IS NOT A TEST OF DQ11 HARDWARE! !!!!1! 


KEY LOCATIONS 
RETURN (1210) — 


NEXT (1212) 
TSTNO (1222) 
RUN (1272 


DO@CROO-DOCR17 
OGST00-DaST17 
(1400)-(1476) 


CONTAINS THE ADDRESS WHERE PROGRAM WILL 
' RETURN WHEN ITERATION peal IS REACHED 
OR IF LOOP ON TEST IS 9 

nial. THE ADDRESS OF THE "NeXT TEST 
TQ BE PEFORMED. 

CONTAINS hia —e OF THE TEST NOW 


BEING PEFOR 
THE BIT IN “RUN” ALWAYS POINTS ONE 
PAST THE DQi1 CURRENTLY BEING TESTED. 


EXA, 

(RUN) 1272/0000000001 000000 

MEANS THAT DQG11 NO.OS IS THE DQ11 NOW 
RUNNING. 


THESE LOCATIONS CONTAIN THE INFORMATION 
NEEDED TO TEST UP TO 16 (DECIMAL) DO11S 
SEQUENTIALY. THEY CONTAIN THE CSR, VECTOR 
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AND STATUS CONCERNING THE CONFIGURATION 
EACH DQ11. 


OF 
DQACTVY .1500) EACH BIT SET IN THIS LOCATION INDICATES 
Tht ane ASSOCIATED DQ11 WILL BE TESTED 







EXAMPLE: 

(DQACTV) 1500/0000000000011111 
MEANS THAT DQ11 NO. 00,01,02,03,04 
BILL TESTED. 


LE: 
(DOACTV) 1500/0000000000010001 
MEANS THAT DQ11 NO. 00,04 
WILL BE TEST FD. 
DQCSR (1506) CONTAINS THE RECEIVER CSR OF THE 
URRENT DQ11 UNDER TEST. 


DQSTAT (1510) CONTAINS: THE STATUS OF THE CURRENT 
geil —, bu 









BIT 15 WO SYNC _CHARS/ONE SYNC CHAR 

BIT 14 SET: TEST JUMPER INSTALLED/NOT INSTALLED 

BIT 13 SET: BS OPTION INSTALLED/NOT INST sy LED 

BIT le SET: BA_OFTION dl INSTALLED 

BIT 11 SET: ACTIVE ON FIRS T NON-SYNC/ACTIVE AFTER NO. OF SYNC 
BIT 10 SET: AB att N INSTALLED/NOT INSTALLED 

BIT 09 SET: ODD_VRC/EVEN VRC 

BIT 90-08 VECTOR “A” OF DEVICE 






8.5 x METHOD OF AUTO SIZING *## 
8.5.1 FINDING THE CONTROL STATUS REGISTER. 


WHEN LOOKING FOR THE CSR IT IS NECESSARY TO TAKE CARE 
THAT WHEN A CSR IS FOUND THAT IT IS INDEED A DQ11. THAT 
IS THE METHOD OF MY MADNESS FOR THIS ROUTINE. 








T TRAP 0 5 PO! PDATED 
AND ATTEMPTED AGAIN. IF NO TIME-OUT; THE Ri CEIVER "ACTIVE BIT” (BIT 12) 
IS SET AND A *COMPARES FOR BOTH SYNC1 AND SYNC 2 IS DONE 
AT THE MISC. REGISTER. IF THEY ARE THERE THIS IS 
A DQ1I. THE INFORMATION IS STORED AWAY. 


§.5.2 ONE SYNC BIT OR TWO? 


SINCE TOO MUCH HARDWARE mat BE TURNED ON TO SENSE THE 
PRESENTS OF ONE SYNC OR TWO. Ma! PROGRAM ASSUMES TWO SYNC 
CHARS. NOTE: THIS ASSUMPTION MAY BE ALTERED aly AUTO SIZING 
BY ALTERING BIT 15 IN APPRIOATE DQ@STXX: LOCATION 


8.5.3 “BB” OPTION INSTALLED? 
TO SENSE FOR THE “SB” OPTION THE as get SELECTS THE 
CHARACTER DET. REGISTER AND THE LOADS IN ALL 1°S; IF 
ANY ONE OR INST ION OF BITS ARE SET THE BB OPTION 
IS ASSUMED TO EXIST. 


8.5.4 “AB” OPTION INSTALLED? 
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8.5.5 


8.5.6 


8.5.7 


8.5.8 


8.5.9 


10. 





















KO1 


TO SENSE FOR THE “AB” OPTION THE PROGRAM SELECTS THE 
oe on hore REGISTER AND WRITES ALL 1°S INTO IT; IF ANY 
ON viet: MBINATION OF BITS ARE SET THE AB OPTION IS ASSUMED 


“BA” OPTION INSTALLED? 


TO SENSE FOR “BA” OPTION REQUEST TO SEND AND DATA TERMINAL 
READY ARE SET: IF EITHER ONE OR BOTH ARE SET THE PROGRAM 
ASSUMES THE BA OPTION EXISTES 


JUMPER ON END OF CABLE? 


THE PROGRAM CHECKS TO SEE IF EITHER OR BOTH CLEAR 10 
SEND _AND CARRIER ARE SET; IF_SO THE PROGRAM ASSUMES THE 
TEST JUMPER IS ON THE END OF THE CABLE. 


ACTIVE ON FIRST NON-SYNC? 


Bice TOO MUCH HARDWARE MUST BE TURNED ON TO SENSE FOR 
N THE DQ11 GOES ACTIVE | PROGRAM ASSUMES “ACTIVE 

ON FIRST NON-SYNC™. NOTE: THIS CAN BE CHANGED BY ALTERING 

BIT 11 IN THE APPRIOATE DQSTXX: AFTER AUTO SIZING 


SET FOR ODD OR EVEN PARITY? 

AS ABOVE TOO MUCH HARDWARE IS NEED TO yee at PARITY 

WAS rn its ED.SO_ THE PROGRAM ASSEMES ODD PARITY 

NOTE: THIS CAN BE CHANGED BY ALTERING BIT 9 IN APPRIO- 

ATE DQSTXX: LOCATION. AFTER AUTO SIZING 

FINDING THE VECTOR. 

THE PROGRAM SETS “PRIMARY DONE”, "SECONDAY DONE” Bike alien ENABLE” 
AND LOOKS FOR AN INTERUPT. IF If INTERUPTS IT IS PICK 

UP _ AND STORED AWAY. IF NO INTERUPT OCCURES THE PROGRAM 

ASSUMES VECTOR =300. THIS PROBLEM WILL BE FIXED IN ONE 


OF THE DIAGNOSTICS BND *#AUTO SIZING* SHOULD BE REDONE TO 
GET THE CORRECT VECTOR 


PROGRAM DESCRIPTION 
CONTAINED WITHIN LISTING 
LISTING 

FOLLOWING 
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000001 

















LO 





24-MAY-7& 13:14 PAGE le 


-ENABLE AMA 


; MAINDEC-11-DZDQE-¢7< 377) /TX AND RX MISC. AND BCC TESTS 
;COPYRIGHT 1975, DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 01754 


sREVISED 21" JUNE” 76 BY S. CARPENTER 
: A)SUPPORTS SOFTWARE SWITCH REGISTER 
: B) SUPPORTS THE DYNAMIC LOADING OF THE SOFTWARE SWITCH REGISTER 
. sSIORTENG B PROCEDURE 
Loeb. ores oo0200 
:PROGRAM WILL TYPE "MAINDEC-11-DZDQE-C/<377>/TX AND RX MISC. AND BCC TESTS" 
‘PROGRAM WILL TYPE "R™ TO INDICATE THAT TESTING HAS STARTED 


"AT THE END OF @ PASS, PROGRAM WILL TYPE PASS COMPLETE MESSAGE 
:AND THEN RESUME TESTING 


;SWITCH REGISTER OPTIONS 


SW15=100000 ;=1,HALT ON ERROR 

SW14=40000 3=1,LO0P_ON CURRENT uA 
SW13=20000 ;=1, INHIBIT_ERROR_ TYP 

SW12=10000 ;=1,DELETE TYPEQUT/BELL ON ERROR. 
SW11=4000 sy ott a ITERATION 

SW10=2000 ;=1,ESCAPE TO NEXT TEST ON ERROR 
SWO9=1000 ;=1,LOOP WITH CURRENT DATA 
SWO8=400 ;=1,LOO0P ON ERROR 

SWO06=190 

SWOS=40 

SWO4=20 

SWO3=10 

SWO2=4 ;LOCK ON TEST SELECT 

SWO1= RESTART PROGRAM AT peLER TED TEST 
SWOO=1 :RESELECT DG11 DESIRED A 


Vv 
NOTE: THIS MUST NOT EXCEED ORIGINAL COUNT 
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S82 
583 ;REGISTER DEFINITIONS 
58S 000090 RO=%0 ; GENERAL REGISTER 







;GENERAL REGISTER 
$31 000996 SP=%6 SBROCESSOR STACK POINTER 
5392 J00007 PC=%7 PROGRAM COUNTER 


;LOCATION EQUIVALENCIES 

















$96 177570 OSWR= 177570 ;HARDWARE SWITCH REGISTER LOC. 
$97 177320 pel Glee are ; HARDWARE Diary REGISTER Loe. 
598 77776 PS=177776 ;PROCESSOR STATUS WORD 

§99 001248 STACK=1200 ;START OF PROCESSOR STACK 






601 ; INSTRUCTION DEFINITIONS 








603 005746 PUSH1SP=5746 ;DECREMENT PROCESSOR STACK 1 WORD 
604 005726 POP 1SP=5726 ; INCREMENT PROCESSOR STACK 1 WORD 
605 010046 PUSHRO=10046 ;SAVE RO ON STACK 
606 012500 POPRO=12600 RESTORE RO FROM STACK 
607 024646 PUSHESP=24646 s DECRENENT STACK TWICE 
608 O2262e POP2SP=22626 INCREMENT STACK TWICE 
Pre EQUIV EMT,HLT :BASIC DEFINITION OF ERROR CALL 
611 
Ele 109000 81T15=100000 
$13 040000 B1T14=40000 
614 020000 B1T13=20000 
615 010000 B1T1e=10000 
616 004000 B1T11=4000 
617 002000 B1T10=2000 
618 001000 B1T9=1000 
619 000400 BIT8=400 
620 009200 BIT7=200 
bel 000100 81T6=100 
: J00040 BIT 
BIT 
BIT 
BIT 
BIT 
627 000901 BIT 








p20 ;DQ11 OPTIONAL DEFINITIONS 

E32 002000 ABBIT=2000 ‘ 
632 004000 ACTBIT=4000 
634 010000 BABIT=10000 

635 020000 B881T=20000 


636 040000 JUMBIT=40900 
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PAG 
GENERAL DEFINATIONS AND EQUIVALENCIES 


180000 


ri 


0 
000007 
900010 


8) 
000017 


00082 T=10U0 
SYN8IT=100000 





NOL. 


;DQ11 SECONDARY REGISTER DEFINATIONS 


Ric P=] 


Y.=17 


IRECELVER Uo" COUNT Peifiy 


; TRANSMITTER BUS ADDRESS PRIMARY. 
TRANSMITTER BUS ADDRESS PRIMARY. 
+a SECO Leta 


C T SECONDARY 
i TRANSMT TER BUS ADDRESS SECONDARY. 
: TRANSMITTER WORD COUNT SECONDARY. 


CONC REGISTER DETECT REGISTER. 
tRYSCELCANEOUS: REGISTER. 

: TRANSMITTER MUX REGISTER. 
SEQUENCE REGISTER. 
RECEIVER BCC REGISTER. 

: TRANSMITTER BCC REGISTER. 
;POLYNOMIAL REGISTER. 
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R FOR UNEXPESTED INI 


iv 





: FRAPCATCAER FOR ILLEGAL INTERRUPTS 


5 + Be be De 
’ 

tw fot rot ror ro 
— ~~ -< 


3Ul CT 
: EVAMINE. sai TO F 


RAP 79 THIS A searIon 
eK ob rh INO © 
AP TO THIS LOCATION 


RAP 72 aes 5 LOVATION 


SUNEXPESTED TRAP To THIS LOCATION 
EXAMINE STACK T 


8 


tetatetetetey 
REEEEE 


CAUSE 


‘UNEXPECT TED TRAP TO THIS LOCATION 
ZENANINE STACK TO FIND CAUSE 
* UNEX ere RAP TO THIS LOCATION 


Re ata 
BE 


¢ no 

30 
ct) 
OowW 

20000 


3 


ACK TO_FIND CAUSE 


My 9 THIS LOCATION 
0 FINO CA 


neeeES Dk L 
pe Te Yaa 0 Fr THIS LOCATION 


ane 
88 


INO 
388 


NNN OOOO OOmrmomra 
WIOOOOOOAIM 
- o-o-- . 


wine 


c 
190 
IIOO1 


FESRERSN PVE RE REel and 


20 +00 0-20-2040 + UF 


NNNNNNNNGIS 
“SOP + dure $C). 010 S39 





ne 
NBINE STA + Sap rp et LOCATION 
eis Tee Pac TO Hi3 os 
SECTED Tae ap THis LOCATION 
‘INE STAC SAUSe 
XPECT oT hia 19. THIS LOCATIO 
RINE | K 0 FIND CAUSE 
UNEXPECT Qa 2 THIS LOSATION 
ENANTNE CAUSE 
PECT ine 1D, Tate OCATION 
MINE NO. EAUSE 
XPECT ACP 19, THIS LOCATION 
fee? TACK K 10 FIND CAUSE 
cExaN Ne reD RAP TO THIS LOCATIO 
SEXAMINE STACK TO FIND CAUSE 





DED 


oe 330230 
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TRAPCATCHER SOR UNEXPECTED INTERUPTS 


090156 +2 
se - 
oor HALT 
a = 
sooth Halt 
¢ 
oe is 
399958 HA T 
eee: _ 
900609 HALT 
sivas ier 
pod222 48 
699999 HALT 
0002 +2 
000 s _ 
cui HALT 
099236 + 
009800 HALT 
oo0242 +8. 
Sbhoge ey 
paces HOLT 
00 se ALT 
sa HALT 
+2 
8) “HALT 
eee -,42 
500900 HALT 
pode7e dey 
3 
990909 HEL 
HALT 
+2 
p50000 HALT 
is HALT 
0316 +2 
9000 HALT 
322 + 
9999 HA T 
258 HALT 
po 33 +e 
60686 HALT 





COe 


: UNEXPECTED. gaia THIS LOCATION 

iGhexPee TED. tRAP A THI AUR TON 
NE STACK AuSE 

HONEST Q Taae TOLTHIS LOEATION 


TACK TO_FINO THIS ak 
Te Thee 19 THIS LOCATION 
TE TRAP THis LOCATION 

TACK TO FIND CAUSE 
CTED TRAP % wile LOCATION 
a CK TO_FIND C 

ve oe THIS LOCATION 
ST ack TO_FINO CAU 
jane ED TRAP TO THIS LOGATION 
MINE STACK TO FIND CAUSE 
s UNE ST £0 Ri wy THIS LOCATION 

; UNEXPECT BD TRAP % THTS LOCATION 
EXAMINE ST “": TO_FINO CAUSE 
: UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
s UNEXPECT TRAP 7 oe THIS LOCATION 


NEXPECT AERAP. T mele LOCATION 
te weyAcK To 


Thee on THIS LOCATION 
ENENINE ACK TOF 
; UNEXPECT p TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 


ACK 
TED Tra 70. ae L3CATION 


DheeecTED Te “yee 10 9 o Tats Loe ST SEATION 
; UNEXPECTED g FRAP. 10 Ms USEATION 
gee Hat TRAP foe THIS LOCATION 

xPee TED TRAP TO . LOCATION 


INE STACK TO FI RUSE 
ithepeet D TRAP ya THIS ao 


pega Bb tna To. yt HIS 5 LGEATION 


iUNEXEECTE TRAP TO THIEL Lagat ION 
XAMINE STACK TO FIND ¢ 


DEnite § TRAP TO THIS LOCATION 








DSD9E NACYLI er SBEAr 
EC. Pil 


DZOe we 


O=* 6-2 0 2 b+ 0 OCC 
WO YOU CofC. 
Wo 
Ti] 
o 


cococococo.co. co coco cococuodo 


Be 
ant 


O08} 


COOSO0 
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DO0e 


; UNEXPECTED ine oF THIS LOCATION 
SEXAMINE STAC 0 FIND CAUSE 
; UNEXPECTED FRAP TQ THIS LOCATION 
; EXAM TACK A 


UNEXPECTED TRAP TO THIS LOCATION 
; EXAMINE pire TO_FIND CAUSE 
;UNEXPECTED TRAP TO THIS LOCATION 


ZEXAMINE STACK T 
[UNEXPECTED TRAP TO THIS LOCATION 
ZEXAMINE STACK 7 CALISE 
TUNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
sUNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND 
SUNEXPECTED TRAP TO THIS LOCATION 
ZEXAMINE STACK TO FIND CAUSE 
SUNEXPECTED TRAP TO THIS LOCATION 
SEXAMINE STACK TO FIND CAUSE 
ZUNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STAL.. TO FIND CAUSE 

: UNEXPECTED TRAP TO THIS LOCATION 
SEXAMINE STACK Cau 
;UNEXPECTED TRAP TO THIS LOCATION 
tEXAMINE STACK TO FIND CAUS 

: UNEXPECTED TRAP TQ THIS LOCATION 
sEXANINE STACK TO FIND CAL : 
ZUNEXPECTED TRAP TO THIS LBeATION 
‘EXAMINE STACK TO FINO CAUSE 

: UNEXPECTED TRAP TQ THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO FIND CAUSE 
SUNEXPECTED TRAP TO THIS LOCATION 
ZEXAMINE STACK TO FIND CAUSE 
ZUNEXPECTED TRAP TO THIS LOCATION 
s EXAMINE STACK TO FIND CAUSE 

Ph ta 8 TED a oF THIS LOCATION 
SEXAMINE. STACK AU 
UNEXPECTED ‘Kap 0 THIS LOCATION 
s EXAMINE rayhck TO FIND CAUSE 
:UNEXPECTED TRAP TQ THIS LOCATION 
SEXAMINE STACK TO FINO C 

s UNEXPEC TED thee TO THIS LOCATION 
‘EXAMINE STACK TO FIND CAU 
Beare tec Thee TO THIS LOCATION 
: UNEXPEC TED TR “Tere "9 THIS LOCATION 
: EXAMINE : ACK TO FIND CAUSE 

: UNEXPECT C RAP oD THIS LOCATION 
: EXAMI TO FIND CAUSE 


NE _STACK 
sUNEXPECTED TR hg oe THIS LOCATION 
‘Dante AERAP TQ a ran ton 


; EXAMINE 
;UNEXPECTED TRAP TO Tae “U8 ATION 


EXAMINE STACK TO FIND C 















Aza 
ee) 


DZDVEC 
830 900514 


833 900522 
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Pil TRAPCATCHER FOR UNEXPECTED INTERUPTS 


009516 





‘24-May-75 





13:14 


PRG 


. T 
HaLT 
HAT 


E02 


SO OEMTHIE STACK T ae — 
HRESAEETED tha 0 HIS LBtarion 


Bie tars epee 


Eva is Oo erin ee AU on 
‘ewe T P iy TO THIS LOCATION 


sEXA TOFINO C 

i ENEXPEET D. FRAP TO THIS LOCATION 

SEXAMINE STACK TO FIND CAUSE 

!UNEXPECTED TRAP TO THIS LOCATION 

EXAMINE STACK TO FIND CAUSE 

:UNEXPECTED TRAP TO THIS LOCATION 

ZEXAMINE STACK TO FIND CAUSE 

sUNEXPECTED TR TRAP TQ THIS LOCATION 

i JNEXPECTED Tae 10 THIS LOCATION 
XAMINE STACK T 

HINEXPECTED Th TRAP TO THIS LOCATION 

: UNEXPECTED Thee TO THIS LOCATION 

SEXAMINE STACK 

sUNEXPECT D Trae TO THIS LOCATION 

ZEXAMINE STACK T 

:UNEXPECTED TRAP TO THIS LOCATION 


D 
im 
x 
4 


MINE 
SNe XPEC rep TRAP TQ THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
TE NTNE STAC TRAP TO THIS LOCATION 
XAMINE STACK TO FIND CAUSE 
:UNEXPECTED TRAP TO THIS LOCATION 
sEXAMINE STACK TO 


I r 
; UNEXPEC ue TRAP TO THIS en 
EXAMINE STACK TO FIND C 
UNEXPECTED TRAP 9 THIS LOCATION 
; EXAMINE STACK TO F 
3 UNE TRAP TQ THIS LOCATION 


:UNEXPECTED Nae TQ THIS LOCATION 


ee QO FIND C 
HINEXPECT 0 Free TQ THIS LOCATION 
XAMINE STACK T 


iUNEXPEC "Hatt a THIS LOC LOCATION 
: TED TRAP 9. THIS PBEATION 


Beit TQ THIS LOCATION 
ere wera To 10 Th THIS LOCATION 


INE XPECTED TRAP TO THs LOCATION 
; EXAMINE § ACK TO FIND CAUSE 
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+2 
HALT 
HALT 








FOe 


sUNEXPECTED TRAP TO THIS LOCATION 
ZEXAMINE STAC 


Beare hao Penge 
; UNEXPECT 


tENERPLE STACK TO_FIND CAUSE 


M 

: UNEXPECTED Thee TQ THIS LOCATION 
XAMINE STACK T 

‘UNE XPECTED TRAP y THIS LOCATION 

EXAMINE STACK TO FIND CAUSE 

s UNEXPECTED TRAP TQ THIS LOCATION 
XAMINE Ws K TO_FIND CAUSE 

S UNE XP ECTED TRAP TO THIS LOCATION 

EXAMINE STACK TO FIND CAUSE 

s UNE XPECTE TRAP TO THIS LOCATION 
XAMINE STACK FIND ¢ 

SONEXPECTED TRAP ” THIS LOCATION 

EXAMINE STACK TO FIND 

; UNEX XPEC ue os ” THIS LOCATION 
XAMINE S$ TO_FIND CAU 

S UNEX PECTED. SRaP TQ THIS LBEATION 

EXAMINE STACK TO FIND CAUSE 








C.Pil 


ae 
tee 
oob034 
090036 
OOOS46 


000052 


000200 
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oocco4 
001000 
O00146 
eaten 
001244 
177776 


000349 


009300 


0000897 
000142 


001812 
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ROUTINES USED FOR AUTO SIZING. 


G02 





;STANDARD INTERRUPT VECTORS 


.PFAIL ;POWER FAI HOLES 

340 s SERVICE a . pw 

-HLT ; ERROR 

TR | SUA ace 

. TRPSRV _ GENERAL HANDLE —— SERVICE 
m 340 SERVICE AT LEVEL 

LOGICAL ;ACT HOOKS 


WORD 0 
THIS ROUTINE TRIES TO_FORCE THE REE IVER TO_INTERUPT 
:T0 ‘T3. VECTOR WHERE IT WILL PICK UP _THE snoThs FOR TTS 


*NEW PS. THE ¢ TION IS 
:EXECUTED, TRAPPING TO LOCATION 20 WHERE A ROUTINE IS EXECUTED 
519. TRKE tHE PC FROM THE STACK SND US I AS THE VECTOR ADDRESS 


VECMAP: 
18: M R1, (RO)+ : START FILLING THE VECTOR AREA 
MOV #4° (Rl)+ :HITH . T ATE 
CMP (RO)+, (R1)+ : UPDATE "Shep POINTERS 
CMP R1, #1000 ?IS ALL FLOATING VECTOR AREA DONE 
BLOS i$. -BR IF NOT ALL DONE 
MOV 2820 :SET FOR IOT TRAP SY DG11 
MOV panty, TEMP *GET THE ACTIVE DQ11 S 
2s: ROR iARE YOU ACTIVE.. ba ll 
BS og F CARRY CLEAR.. NO MORE DO1IS 
CLR PS CLEAR P 
TST (R2)+ :PUT POINTER TO STATUS TABLE 
MOV #340, 9-2(R2) :TRY AND SET PRI7SEC DONE AND IE 
INCB = RO ;DELAY........ 
BNE a en DELAY 
Move #300 (Re) :NO_INTERUPT ASSUME 300 FIX IN TEST C 
38: TST (R2)+ ‘UPDATE POINTERS 
BR 2s :60 DO IT AGAIN 
4S: BIS (SP) (R2) sENTERD BY IOT TRAP BY DQL1 
BIC (Re) ‘CLEAR UNWANTED BITS 
CMP feaige (SP)s sEOP TOT JUNK OFF STACK 
MOV #3$, (SP) :SET RETURN PC ON STACK 
RTI :G0 HOME. 
S$: RTS PC SALL SIZING IS DONE 
;##4*S0F THARE SWITCH REGISTER#### 
ISPREG: FTWARE DISPLAY REGISTER 
piseRe 5 ROE TWGRE SHITEH REGISTER 
:PROGRAM START 
.=200 
IMP START :G0 TO START OF PROGRAM 








HO02 
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=220 
000220 001400 CSRMAP: , fa »R2 EER EARS STATUS TABLE 


L 
001512 Hei2, R2 ‘ALL TABLE DONE 
-6 :BR 4 MORE TO GO 
901504 DoNun : SET UNBER OF yponts TO 0 
#1400 : SET TABL E p 
*LeoGd0 RL GET FIRST FLOATING ADDRESS 
oco0004 85S, a#4 sSET FOR TIME OUT TRAP--NO DEVICE-- 
oo00o0os 1S: #12'S(R1) AND SEL MISC REGISTER 
B(R1) i TRY AND CLEAR MISC REG 
#10000, (R1) : T 


oo000s #30000; 6(R1) 
R1, (Re)+ 
BSYNBIT, (Re? 
(RL) 

oo0005 

000006 


REGIS 
SAPPERENTLY NO_ BB OPTION 
:SET FOR BB OPTION 


» fF ‘ 
000005 :SEL_POLYNO. REGISTER 
000006 sHRITE BTN 


000002 
000002 


010600 
03 


SET FOR BR OPTION 
0000 900002 -CS. .CO. SET 


BR if NO JUMPER 
:SET FOR JUMPE 
;SET FOR ACTIVE ON FIRST NON-SYNC 
SET FOR ODD VRC 

;POP POINTER 

CLEAR RCSR 
; MS 

;CLEAR AGAIN 
; CLEAR ERROR REG 

AR SEC 


»+~MOOWMWWwMMD =z 
f— "Wet IN IMHO 
DDAMNMUMIO ANG 4A<MoO 


UND 
sHEY BUDDY. “10 DQi1S FOUND IN SYSTEM 
DQNUM, R1 AV 
R1, SAVNUM t Save NUMER POR ACTII 
‘8 : CLEAR rie 
DGACTV ay ACTIVE ADDRESS 


DOACTY BIT 
Rl :DEC NUMBER OF DQLIS 
3$ :BR IF MORE TO GO 
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ROUTINES USED FOR AUTO SIZING. 


000004 
001502 
00002e 


ral 
461 


40 
051505 


(377) «12> /MAINDEC-11-DZDQE-C/<377>/TX AND RX MISC. AND BCC TESTS/<377> 


; INDIRECT POINTERS 


;PROGRAM CONTROL PARAMETERS 


ONDOOOWNOIN0O0 


" ypnoown VARTABLES 












;RESET TIME OUT VECTOR 


ri 10f Th TRAP P PRIO: TO 7 


SET VECTOR START 
a Mesos 


iI DIDN’ ? FIND ANY DQ11S. DON’T USE AUTO SIZE. 
HOW CAN_I TEST NO DQ11S 


;DON’T LET OPR HIT CONT. SW 
pay BY TIME OUT TRAP 





















;SWITCH REGISTER Pome 


 TELEPRINTER CONTROL REGISTER 
;TELEPRINTER DATA BUFFER 








;SCOPE ADDRESS FOR LOOP ON TEST 


OF I yons 
NUMBER OF ITEREATIONS COMPLETED 
PROGRESS 







; TEMPORARY STORAGE 
: TEMPORARY STORAGE 












DZD0EC.P11 


> *b-—- 0 b+ b= B-- b= b-< b= 9 = p — p< 9 9 9 9 - > 
9b 0 (QON0000 


at itbet efits i 
oO 
Oo 
_ 
ww 
ie) 
Loe] 
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PROGRAM PARAMETERS, VARIABLES, 
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23 


AND TRAP CALLS. 


000900 TEMP3: 0 
000900 TEMPY: 0 
000000 TEMPS: Q 
QCOO SAVRO: O 
00 SAVRI: Q 
0000 SAVRe: OQ 
0000 SAVR3: 9 
000 SAVRY: 0 
000000 SAVRS: OC 
00 SAVSP: 0 
000009 SAVPC: 0 
300900 SAVNUM: O 
000001 CREAM: .BLKW 
00090 RUNFLG: 0 
000000 RUN: Q 
900080 RUNCNT: 0 


1 


JO2 


; TEMPORARY STORAGE 
s TEMPORARY STORAGE 
* TEMPORARY STORAGE 
*RO STORAGE 
sR1 AGE 
:Re STORAGE 


: AGE 
sSTACK POINTER STORAGE 
;PROGRAM COUNTER STORAGE 


















Oo 
ut 


001314 
001314 
001316 012642 
001326 012662 
001322 012770 
901324 013106 
001326 yettta 
00330 base 
001332 ars4i4 
001334 013446 
001336 013452 
001340 012324 
001342 012200 
001344 014354 
001346 


Os 02 0 ee 0 os 2 be os be be bo hs he ho he pn hn bs hs ho he ee pe pe he 
HNN OONONG) ee ee EE EI WU) wWe IE UTUrUrurunufururufuretatoresotetn eres OOOO 
- tl od 
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PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS. 


KOe2 






;PROGRAM CONTROL FLAGS 


INIFLG: .BYTE 
STFL -B 


; PROGRAM INITIALIZATION FLAG 
; EST START FL * 


ERROR OCCURED FLAG 
;LOCK ON CURRENT” TEST FLAG 


s DEFINITIONS FOR TRAP SUBROUTINE rae 
;POINTERS TO SUBROUTINES CAN BE FOUN 
IN THE TABLE IMMEDIATLY FOLLOWING THE DEFINITIONS 


5 RRRAA KARA KAA L EAR AA LLL AK AAA KEKE LAA EREKAL EL EA RARE REE LLERER ELLE LE REL 
5 aeolian 


TRPTAB: 
SCOPE=TRAP+0 


. SCOPE 
SCOP 1=TRAP+1 


TYPE=TRAP+2 
INSTR=TRAP+3 


TR 
INSTER=TRAP+4 


PARAN=TRAP+5 
SAVOS=TRAP+5 
RESOS=TRAP+7 
CONVRT= TRAP +10 
CRT=TRABS II 
MSTCLR= TRAPS 12 
MEMCLR=TRAP+13 
CKSWR=TRAP+14 
CNTLUSTRAP+15 
.CNTLU 


;CALL 
;CALL 
;CALL 
; CALL 


;CALL. 


; CALL 
; CALL 
; CALL 
;CALL 
; CALL 
;CALL 
; CALL 
;CALL 
;CALL 


TO SCOPE LOOP AND ITERATION HANDLER 
TO LOOP ON CURRENT DATA HANDLER 

TO TELETYPE OUTPUT ROUTINE 

TO ASCII STRING INPUT ROUTINE 

TO INPUT ERROR HANDLER 

TO NUMERICAL DATA INPUT ROUTINE 

TO REGISTER SAVE ROUTINE 

TO REGISTER RESTORE ROUTINE 

TO DATA OUTPUT ROUTINE 

TO DATA OUTPUT ROUNTINE WITHOUT CR/LF. 
TO ISSUE MASTER CLEAR 

TO CLEAR ALL SCRATCH PAD MEMORIES 

TO ALLOW SWREG TO BE LOADED FROM TTY 
TO ALLOW LOADING OF SWREG FROM TTY 


5 RRRRRRRLAA LEEK LRA L EE ERLE KLEE RE RAA ERE REA RARER RAEL ERA A ALARA RA ARELER 
EHH GHEE HEHEHE HEHEHE HOHE EEE EERE EE 


;0Q11 VECTOR AND REGISTER INDIRECT POINTERS 
; POINTER 1 DQi1 Receiver int INTERRUPT VECTOR 


DORVEC: 0 











R_INTERRUPT SERVECS PS 
ER INTERR 
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~ 

ro m 
fore 
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ODO .0D DOD 0.00 WOO MWWMWW IInd VII IIT OOOO Oro 


furor 


— + 0 






000090 


001400 


000001 
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PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS. 


Oe 0 


LOe 





;POINTER TO DQ11 TRANSMITTER CONTROL REGISTER 
POINTER TO DQ11 ERROR RE 

;POINTER TO HIGH BYTE OF a's REGISTER 

;POINTER TO DQi1 SECONDARY R 

:POINTER TO HIGH BYTE OF DQ11 SECONDARY REGISTER 


;0Q11 STATUS TABLE AND ADDRESS ASSIGNMENTS 


i CONTROL STATUS REGISTER FOR DEVICE NO: 00 


;VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 


; CONTROL STATUS REGISTER FO 


CTOR AND CONFIGURATION "STATUS FOR be DEVICE NO: 
: O2 
: G 
: O4 
: OS 
: O6 
; 77 
: 10 
: ii 
: lz 
: ig 
: 14 
VECTOR a CONFIGURATION STATUS FOR DEVICE NO: 


VE 
:CONTROL STATUS REGISTER F 


;CONTROL STATUS REGISTER FOR DEVICE NO: 


;VECTOR AND CONFIGURATION NSA ay DEVICE NO: 


;CONTROL STATUS REGISTER FOR 


; VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 
E TESTING 


DQ11S 
‘ OCTAL NUMBER OF TOTAL NUMBER OD DQ11S 
:CSR OF DQ11 UNDER TEST 


06 
01 


15 
16 
17 


;VECTOR AND CONFIGURATION STATUS OF DQ11 UNDER TEST 


; PROGRAM TTI LEAT TON 


CTOR 
Ser caR PROGRAM CONTROL FLAGS AND COUNTS 
;TYPE TITLE MESSAGE 
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DZDQEC.P11 


001512 
001520 


70 
1271 


0020 


00 


e 
e034 


PROGRAM INITIALIZATION AND START UP. 


012737 
le?’ 


02 


1044 
105137 


012737 


02773 


4 
7 
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000340 
8) 


001512 
001310 


001000 
001310 


177777 


000176 
000174 
o0co04 
000006 
oood4e 
000i76 


177232 
000220 


177252 


o0c00e 
000001 


177140 


177776 


000024 
001276 


001200 
001202 


oo0004 
177310 


001200 
001202 


001200 


001244 
001246 


001244 
177160 


001502 


~START: MOV 
MOV 


MO2 


#340, PS 

aSTACK, SP 

#.PFAIL, a#e4 

DQNUM, SAVNUM 

STFLG 

PASCNT 

ERRFLG 

RUNFLG 

#1400, CREAM 

ERRCNT 
ERR | 

#1, TSTNO 

#. START, RETURN 

INIFLG 

12$ 

MTITLE 

tNIFLG 


#DSWR, SWR 
#DLIGHTS, LIGHTS 
a6, -(SP3 

a#4; -(SP) 

#64$. a¢4 

#-1, 2SWR 

65S 


665 
(SP)+, (SP)+ 
#SWREG, SWR 
#DISPREG, LIGHTS 
(SP)+, 084 
(SP)+! a86 
ae42 


675 
#SWREG, SWR 
BNE 67$ 


asur 
PC, CSRMAP 


XHEAD 
81400, TEMP1 
aTENPL, TEMPE 


#2, TEMP1 
#SWOO, JSWR 
1$ 


RO 


JSWR, SAVACT 


;LOCK OUT INTERRUPTS 

;SET UP pirek 

;SET UP POWER FAIL VECTOR 
LEAR START FLAG 

;CLEAR PASS COUNT 

;CLEAR ERROR FLAG 


;CLEAR ERROR COUNT 

;CLEAR LAST ERROR POINTER 

;SET UP l 

;SET UP FOR POWER FAIL BEFORE 

; TESTING STARTS 

;HAS INITIALIZATION BEEN PERFORMED 


; TYPE TITLE MESSAGE 
;IF NOT SET FLAG AND DO 


;MOV HARDWARE SWR_TO_SWR 
;MOV_DISPLAY LIGHTS TO LIGHTS 
;SAVE VECTORS 


;SET UP FOR TIMEOUT 
sREFERENCE HARDWARE SWITCH REGISTER 


;ADJUST_STACK 

;POINT TO SOFTWARE SWITCH REG 
;POINT TO SOFT DISPLAY REG 
;RESTORE VECTORS 


;UNDER MONITOR 
31S SWREG USED 
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TES 


tM 
TP EPONOULOPOR LOLD 


S 
nm 


piste: 


020-090-2008 
(9.000 NOUN £UINMUe- OW 
" 
uo 
Sa 


> 0+ 0-2 0 0 0-200 + 0+ 00 6 0- + 


ere ee 
oad 
' 
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PROGRAM INITIALIZATION AND START UP. 


001500 118: 


177776 


177032 


O1es4o 
Ol2S4e 


001214 


;TEST START AND RESTART 


ST 1 
: LEELREREEEEEERESESEASERSE SEAR ARSE REAP AASEERAEE SAAR RSH TESE EA AEETEE 


Lae Tf 


NTER. 
OR MAX OF 16 0011°S PER SYSTEM 
FLAG 

















































sLOCK OUT INTERRUPTS 
i$ T uf Ha, 
si 0 UNDER MONITOR CONTROL 


;CHECK FOR <?G@> 
;CHECK FOR LOCK ON TEST 





;SET UP TO LOCK 


SLOCK NOT SELECTED. SET UP FOR NORMAL SCOPE LOOP 
$e NOT EES ante E, ae 





:START AT TEST 1 
‘tyes S 
sSTART TESTING 






MY FIRST TIME HERE? 






nsnae 


xSK bt 
a7? 





GIGIGIGIGIG 4IGIGIGIGS 


ea 


eas 


0 0 0 > 0+ 0-2 0-0 08-9 6 <> <b 0-0 +b 0 6-9-0 6-2 = 9-0 & « §-0 Bo h-0 fo 
=) 
ee 


eS 


1504 
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003002 
003226 
100000 


018382 
000026 
C4008 
001216 
17beb2 
015354 


015756 


17eN00 
157 
176366 
1774 









13314 
RECEIVER ano TRANSMIT? 


091226 
0012i& 


003520 


018382 


001510 
001214 


176374 
176362 
176359 
176336 
176326 
176322 
176310 


001246 





. ee 
ESTs ‘JS BCC TESTS. 


: FR Bs TEN in hg ere ia ey ee 
8 | 

MOV #TS73, NEXT 

: B17 eSVNBIT,DaSTAT sADIUST POINTER FOR HUNGER oF SYNC CHARS. 


i I 
RF SYNC a Ine? SYNE ie 0 hte Ey SYNC SEL. 
BR CKDN TQ CONT. 
MOVE #26, SYNC RESET fe test. SYNC TO 26 
NOP ; CONTINU 


BIT aJUNBIT, odsTaT DOES THE TEST JUMPER EXIST. 
MOV cesT RETURN Beeps f Fer NEXT TEST. 
IMP 


JRE TURN 

CLR RO :ZERO Net POINT R. 

MOV 8 TXBUFF RY 7 BUFFER POINTER 

MOVS = - RO, (R44 -FILL TX BUFFER WITH BINARY COUNT PATTERN 
INCB RO [UPDATE CHAR 

NE 1$ BR _IF MORE TO OF 

MEMCLR : CLEAR Dell 

CLR RO :2ERO COUNTER POINTER 

MOV SRXSUFF RY PREPARE TO ZERO ALL RX BUFFER. 
CLRB (RMD START CLEARING. 

INCS =_- RO :UPDAT 

BNE 3$ :8R IF NOT ALL CLEARED. 

CLAS  adDOREG -SELECT RX BA PRI. 

MOV SRXBUFF,2D0SEC : T. 

INCE  aDQREG fon RX WC PRI. 

MOY 8-400. ID@SEC i IT FOR 400(8) CHARS. 
INCE = SDOREG EL TX _BA PRI. 

MOV BS YNC, DQSEC Ir. 

INCB - a0 Set TX We PR G 

MOY 8-402, IDOSEC 400(8) CHARS AND TWO SYNC. 
MOVB #11. a00REG sSEL SYNC REGISTER 

MOV SYNC, ADOSEC iT 

INCB ores T MISC REGISTER 

MOY 84000, 2DQSEC set FOR ag rchTBITs. 

CLR TEMP SET DELAY...... 

MOY 820, TEMP2 nll 

NC au gRCSR eR 

NC DaTcsR ;SET T 

TST SDUERR ¥ ERR SR <* 
BPL 3 A IF NO ERRORS 


CO3 





: CABLE: "EST. 
TEST OF DATA REALISILITY THROUGH 
;CABLE PND LEVEL CONVERTERS. 


sNOTE: IF JUMPER IS _NOT_INSTALLED 
: AT ENO OF CABLE THIS TEST IS NOT 
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etatetstets, 
GIGIGIOIGS 
ffi 
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GIGIGILIGIGI 
1-2 0-2 0 -< 0-< § 2 92 b—< b-2 f= § 2 B= 0 B= 0 BB He 


BESBEE 
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017700 
017701 
Q 


0Se 
0013 
BI3705 
105024 
oe 


oo0s0co 
012704 


176242 

24e 
176240 
176224 
001244 
001246 


000003 
003520 


015756 


01S3S4 


015354 





MOV JOORCSR, RO 
MOV IDATCSR,R1 
MOV QDGERR R Re 


HLT THE DOL ERROR FLAG IS SET. 
Tets  SDQRCSR 2S RX PRI DONE SET? 
BMI «S$ BR IF TF YES 
INC = TEMPL ;DELAY..... 
BNE 4 . 
BEC TENPE veka 
NE 4 
HLT . $RX_PRI, DONE FAILED TO SET. 
cLR = RO | ¢ZERO COUNTER. 
stk TENS ;CLEAR STORAGE 
MOV #TXBUFF,RY :GeT TX BUFFER BREA 
MOV ss BRXBUFF/ RS :GET_RX BUFFER A 
MOVB = (R4) +, TEMPS ;LORD FOR ERROR ALL 
—MOVB — (R5)+; TEMPY 
CMP 6s TEMPS'TEMP4 ©» DOES DATA CHECK OUT Ok? 
BEQ sw. + BR TF Good bara. 
HLT = B COHPARISON ERROR. 
INCB RO i UPOATE ¢ 
BNE «OS :BR IF NORE DATA TO CHECK. 
SCOPE :SCOPE THE TEST. 


cep yen STRIP SYNC TEST. 
1. RECEIVER CAN STRIP SYNC. 
chan TERS F ROM Ue Se WILL BE TRANSFERED 
I AIL_OF SYNC CHAR I 


AY HA HARS. G . 
Dy Maye aS 4 AND RECEIVER BUFFERS ARE BOTH 


3 GLERRED 2 OF 08 Che ate nee WILL Be TRANSMITTER INTO 
BONE SETS; 


s THE RECE WHEN BK P 
THE RECEIVER. BUFFER I$. CHECKED FOR ANY SYNC 
:CHARACTERS (026). IF No NE BR E FOUND THEN THE 
RECEIVER BID NOEED STRIP SYNC. 


; TEST 3 
: FLAAEEERE AAAELHALAARELSRALALSLARA LALA RELA RASAARRALAARATALTRAARTAE 


MOY #3, TSTN 

MOV aTST4, NEXT 

CLR’ RD sCL RR POINTER. 

MOY #RXBUFF RY :SE UEFER 

CLRB 3s (RMD + Earn 0 RS EAR HE RX SUFFER 
INCB RO ?ALL DONE? 

BNE 1 :BR IF NO 

CLR sRESET T RO TO 9_ZER 0 

MOV #TXBUFF ,R4 :GET TX BUFFE 

CLRB (R4)+ EIN 8 _ CLEAR THE TX BUFFER 
Iivc8 RO : DONE YET? 

BNE st :BR IF NO 

CLR 


RO ;RESET RO 
sTXBUFF ,R4 ;GET TX BUFFER 
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0 ~+ 0 0 -< » < 8-2 b+ & + = = Bh 9 po ho 
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10 


100375 
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E03 


7$: MOVS = RO, (R4)+ START FILLING WITH CHARS. 
INCB = RO :UPDATE POINTE 
che #25,R0 i SYNC YE Yer? 
NE ? 
MOV #26, Re : SET FoR” SYNC CHAR. 
$$: MOVE RO, (R4)+ ‘FILL TX BUFFER WITH SYNC CHARS. 
INCE = R2 :MORE TO GO? 
BPL 6 -BR IF YES 
MEMCLR sCLEAR ALL 0911 
CLRB aDQREG :SEL RX SA PRI. 
MOV #RXBUFF,ADQSEC ;SET SUFFER. 
INCB  aDOREG RX WC PRI. 
MOV #-400,3D0SEC  :256. CHARS 
INCB ;TX BA PRI. 
MOV RSYNC, QDQSEC :SET TO XMIT SYNC CHARS. 
INCB 1X W Ai? 
MOV #-409, IDQSEC 58. a 
MOVB 811, dDOQRES & Reet TER 
MOV SYNC, IDQSEC teed SYNC REGISTER 
INCB  aDOREG nist. 8 gIsI ER. 
MOV #4010, aDQSEC TS AND TES TEST LOOP 


MOV #00003, QDORCSR G0 AND” ST 


Ni 
iN Beeeune’ $8 DELAY. 
CLR RI 
2s: TSTB aDQRCSR RX AOBNE? 
SMT 3$ :8R IF YES 
ADD #1,R0 :D 
BNE 2$ : £ 
NCSL .. 
PL +) ; a, 
HLT RX PRI DONE NOT SET. 
38: CLR QDORCSR DSRS BL BR 
CLR aDQTCSR T 
CLR RO a aan 
MOV #RXBUFF RY 3Et RX BU eR 
38: CMPB sw, (R4S+ SONY SYNC CHARS? 
BNE +4 :BR IF NONE 
HLT sREC VER ofnteh NOT STRIP SYNC. 
INCB RD UPDATE CO 
33 BR IF MOR 60. 
SCOPE :SCOPE THIS test. 


‘war MEMORY TRANSFER TESTS 


THe ef Gfrreg HAS _AT BEAST SK OF MEMORY 
THIS EST WILL BE EXECUT 


; THE FIRST PART EXERCISES THE TRANSMITTER ALONE 
; TRANSMITTING FROM ADD. 20000 TO LAST MEMORY ADD. 
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UIUNUNT Un UUtut 
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0 b= oh 0 ae 
Oe 
—-O 


001226 
001216 


000904 


000004 


001220 
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tsTu; 


1$: 


es: 


33: 


Ss: 


as4 


s UNE BERK MINUS ¥ 
HARE Re TRANSE 


‘AFTER THE TX ALONE TH 
ARE EXERCISED 


; MANNER AS DESCRIBED ASOVE 


a4 
#TST5, NEXT 


alot 304 


#23, 984 
#20900, RO 
#20000, "RO 


| arma ~RC 


#STACK, SP 
a8 LOCK 


pang H1 


2200 0,R0 
aS’ O}+ 


es, Re 
+4 


Re 
RO,LIMIT.HI 
3$ 


#2, JDOREG 
sS0008 baste 


seers EMPY 


DOOREG 
TEWbs aooseC 





FO3 


OGE THE 


SRELORD rah ee x BA PRI. 
;SE 





(AYE ABL). DATA {s 
A TIME. thio” EIGHT BI 
ERED AT ONE TIME. 


N 1 THE Ng AND RECEIVER 





; TEST 4 
Reetiriititiitttiitiiiitiittitiiitritititiiiiiitiiiritittiirtiritete. 
OV 


;SAVE THE ys QUT VECTOR 
LOAD TRAP 
; CHECK FOR aK oF MEMORY. 


CP U DOES HAVE AT LEAST 8K. 
;PREPARE TO SIZE MEMORY TO 28K 
; CHECK (nen ORY. 





- 


; 28K HIT YET. 


ADJUST STACK 
;SET FOR LOCK _(SWO9=1) 












FALL RO FR dbF NT TOR. 

;SAVE LAST MEMOR 

ZERO DATA Chak NTER 

;PRE TO 

ATRL L 

s UPDATE 

DOES IT EQUAL THE SYNC CHAR? 
MP HIGHER 

71S AL OF MEMORY FULL? 
R I 

A) x BA PRI. 

;SET TX BA TO FIRST ADD IN SK 

;SET ue POINTER. 

SENT IN 

ee BACK oy? FOR SCOPE ROUTINE 


an ATM BA PRI. ADDRESS 


TX WC PRI. 
;SET FOR A_TWO SIGHT BIT XFER 
; ' MISC _REGISTE 
; 9 Oirs TEST LOOP AND AUTO/STEP 
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1611 © 


BaRSohnt 
$IIEIISs 


233 
Bare 
: y : 3 


8338838 
RS PON CRE RUT RES 


8 
a 


2 
ys 
-“_ 
m™ 


eee 
see 


snguTegye 
as 


S 


g 
x 


BRES 


OK Oe O--Or- OF- OP-- 
Tw 


= Or ee 


WS 





175344 
001252 


001220 


175270 


175254 


175250 . 


175206 


MOV aDQSEC, TEMP4 





GO3 


3 
ESTS PLUS BCC TESTS. 
ist GDQERR sANY ERRORS? 
cf Bh ERROR Pee SET. 
MOVB #13, IDQREG tSEL TX ae 

MOV (RO), TEMPS RE AD SOFTWARE POINTER 
che TEN, (RO) 418 TH baTA CORRECT 
HLT 5” DATA COMPARISON ERROR. 
SCOP1 ;LOCK_ON CHARACTER (SWO9=1) 
TST (RO)+ sUPDATE SOF THARE POINTER. 
CMP RO,LIMIT.HI FALL DO 


BNE S$ ;BR F NO 


; THE ABOVE WAS FOR THE TX ONLY 


; THE BELOW ROUTINE EXECISES BOTH THE 
a, AND RX TOGETHER. 


!NOTE THAT THE RX CA SHOULD BE 
‘00 (8) LOCATIONS HIGHER THAN THE TX CA. 


MOV —- #&$, LOCK ;SET FOR LOCK ON CHAR(SWO9=1) 
MOV #20090, RO SET FIRT ADD IN 8K 
MOVB #6, aDQREG ;SEL_TX BA SEC 
MOV RO; IDQSEC ‘LOAD TX BA SEC 

: BR sCONT ’ 
MOVE #6, IDOREG :SEL TX BA SEC. 
SUB #2. JDQSEC :KILL LAST XFER 
CLRB © SDOREG :SEL RX 
SUB #2, JOOSEC KILL LAST XFER 
MOVB ot :SEL mx x BA SEC 
MOV JDOSEC, TEMPY 3 ve 17 
MSTCLR NIT 0011 
CLRB aDOREG :SEL RX BA PRI 
MOV TEMPS anasec LOAD I 
ADD 0, aDQSE :UPDATE IT 
INCB soon SEL RX WC PRI 
MOV DOQSEC :SET FOR TWO CHARS 
INCB Spahes :SEL_TX BA PRI 

y wSYNC,SCISEC :TX SYNC ON PRI. 

INCB aDQREG :SEL TX WC PRI. 
MOV ae DDOSEC :SET FOR TWO SYNC. 
MOVB Q "LOAD TX BA SEC. 
MOV reApY QOQSEC  — s LOAD IT 
INCB DORE SEL TX WC SEC 
MOV #-2, JDQSEC ;SET FOR TWO CHAR XFER 


MOVB oe ,QOORES Po che Te SYNC 
MOV 


INCB sBoret Aa MISC RE 
MOV #4010, IDQSEC SHT BITS fest LOOP 
INC aDaRCSR T RX GO.. 
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004310 


oo44sy 
oo4454 





000800 


175050 


001244 
001246 


175010 
001254 
174776 
174774 
000002 


001252 
0012Se 


oo44s4 


ooogo4 
001216 
174542 
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001246 


001214 





9s: 


108: 


118: 


LIMIT.HI: 
g 


HO3 


IDQTCSR 
TEMP 

aS TeMpe 

aDarcs 


JDQERR 
+4 


(RO), TEMPS 
IDOREG 
JOQSEC, RI 


a 
(RL), TEMPY 
(RQ) , TEMPS 
7 


6 


(RO)+ 
RO,LIMIT.HI 
7$ 

11$ 


RS, a84 
NEXT, RETURN 
aR 


ETURN 


;SET TX Go.. 
s DELAY COUNTER 


‘RX PRI DONE? 
;BR IF YES 
: DELAY 


RX PRI DONE NOT SET. 
ZANY ERRORS 


:BR IF NO. 

:0011 ERROR FLAG SET. 
:SET EXPECTED 
‘SELECT RX BA PRI. 
!GET RX BA 

:GET LAST XFER 
:GET ACTUAL DATA 

IS DATA OF? 

:BR_IF GOOD 

:DATA COMPARISON ERROR 


;LOCK_ON DATA (SWO9=1) 
: UPDATE SOFTWARE POINTER 


L DONE? 
ioe IF_NO 


TEST 
T_STACK POINTER 
fol xt est ECTOR 


300 NEXT 


SCOPE THIS TEST 
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: TESTS 
ETT e ttt Titi titi titi ttt tt ttt tii itiititttttttt ttt tte 
901226 tsTs: 


1$: 


2s: 





TEST OF “ENTER T AND “EXIT T". 
; TRANSMITTER TRIGGERED 


{TEST TO_TRANSMITT ONE CHARACTER ENTERING T 
; CHECKING A, | Pee ne OVERFLOWING 

;CAUSING AN EXIT 

; THAT THE BCC ENT TO ZERO. 


NOTE: IF THE BCC DOES NOT EXIST THESE TESTS WILL NOT BE DONE 


103 











THEN MAKING SURE 


aS TSTNO 
#TST5 NE 
regal, A STAT 


#. EOP, RETURN 
JRE TURN 


















; ISSUE A MASTER CLEAR 


#951 WORD 
QDQREG SSELECT POLY REGISTER 
#200 JDQSEC :SET POLY FOR LRC 8 
#11, COUNT :SET COUNT TO ii 
QDQREG SET TX BA PRI 
aiibRO SORER L "me E-uRITE EN ENTER T 
w1FS,S0QREG SEL TK CEH 
#67, ODQREG :SEL 1 CC SEC-URITE EN EXIT T 
gDO5EC :SET TX CC TO ZERO 
#MIS¢ aDQREG :SEL MISC REG 
#4012. aDQSE FIGHT BITS TEST LOOP AUTO SET 
poten ET Tx GO 


a 

JDQTCSR, IDATCSR AIST TIME. 

DDQTCSR,AIDATCSR ;WAIST TIME 

BDQTCSR; ADQTCSR ;WAIST TIME 

JDQSEC 3C ! 

:START THE CHAR UP 
DOWN 

; DONE vet? 


1$§ ;BR_IF NO 
#16, JDQREG SET TX BCC REG 


aDQSEC, RS : STORE iF 
351,R5 :DID CHAR GET INTO BCC 

TX BCC FAILED 
#MISC.,SDQREG :SEL MISC REG 
#10, COUNT :SET COUNT TO 10 
Dasec START CLOCKING BCC OUT UP 
BDQSEC ; DOWN 
COUNT sDONE YET 


R IF NO 


2s 3B 
#16, 2DQREG sSEL TX BCC 
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00S777 174402 TST @DQSEC 3010 gCe GET SHIFTED OUT? 
sae mi BE +4 ;BR fre’ 
1040 HL X BCC_NOT ZERO 

s ‘SCOP E TEST 


'TEST TO_FORCE 
; RECEIVER BCC ERROR 


:THE TRENSHITTER. CHARACTER COUNT 
SAND THE eS al  etachiat COUNT 


sWILL 

:THUS THE RECEIVER WILL RECEIVE 
:MORE CHARACTERS THAN THE TRANSMITER 
; TRANSMITTED. *BCC ERROR# 


TEST & 
: ee Gee. ae SR ate a ee en ee 
MOV N 


ag. RETURN 
8TST7, NEXT 


012727 


CLEAR TH THE DEVICE 
015354 #TXBUFF , RY SET POINTER FOR BUFFER 
RO, (R4)4+ : STAR FILLING THE BUFFER 
tBPDRTE THE 
1$ HAS THE BOFPER BEEN FILLED 


#120001,XPOLY  ;SELECT CRC 16 FOR POLYNOMIAL 
RS, SYNBCC 360 PRIM THE DQ11 
‘THIS IS THE CHARACTER COUNT FOR THE RECEIVER 
:THIS IS THE CHARACTER COUNT FOR THE TRANSMITTER 
IDQERR, RS *SAVE THE DQ ERROR REGISTER 
RS :DID AN ERROR OCC 
+4 :BR IF THE ERROR “BID oc 
HL 1 ‘HALT THE DQ ERR a A 1 SET 
174266 #BIT6,9DGERR § :MAKE SURE IT fiRe* ec THA CAUSED THE ERROR 
+4 :BR IF THE RX 8 
?RX BCC ERROR 8 
:SCOPE THIS TES 


TEST OF TRANSMITTER BCC 
guITH POLYNOMIAL EQUAL T0 177777 


FOUR HUNDRED BINARY COUNT 
bare PATTERN IS RUN THROUGH 

;THE BCC WITH A SHIFT BY SHIFT 

CHECK OF THE HARDWARE BY THE SOFTWARE. 
SAT THE END THE TRANSMITTER IS ALSO 









ite MACYLL 27( 732) 


ZDQEC.P11 


DOue ¢ 


0 bb bb 2 ph oe pe 
WO IMU COI 2 


+ +— -~ b= b— b+ §— 0-- 6 bP 6 = b— 9 9 pp 
et etetetetetetetetetetatata! 
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012737 


00149 


000007 


177777 


015322 
6 


001226 
001214 
001216 


015326 


001254 


174150 
174144 


005364 
005366 


173772 


73 
baises e 
001252 


;CHECKED TO SEE IF THE BCC WAS SHIFTED 
OUT AND THAT THE BCC WENT TO ZERO. 


NOTE: THERE IS QA TWO SHIFT DELA 
;BEFORE THE TX BCC STARTS. 


; TEST ? 
oar pocaar 3 ~*~ ape neanaimaelamamanmmammmnaneieni 
M 


1S: 


2s: 


TSTNO 
MOV 158 RETURN 
#TST10,NEXT 


0 
MOV #TXBUFF RY 
MOVB RO, (RY) 


8 1§ 
MOV #177777,XPOLY 


MSTCLR 
CLR CALBCC 

_ MOV #16, TEMPS 
CLR ATA 
MOVB 


#22, JDOREG 
MOV #TXBUFF , JDQSEC 
MOVB #123, aDQREG 
MOV #-400, IDQSEC 

4 QREG 


IDORE 
MOV #4012 - IDQSEC 
aDQTCsR 


@DQS 
DEC @DQSEC 
INC @DQSEC 
DEC @DQSEC 
CLR UN 


COUNT 
MOV DATA, 6S 
MOV caLetc C478 
SR RS, 


.BLKW : 
MOVB § ¥MISC., QDQREG 


INC IDOSEC’ 

DEC QSE 

MOYB 16 SQOREG 
MOV aDOSEC, TEMP4 
CMP CALBCC, TEMPY 
BEQ +4 

HLT 3 


JDQTCSR, IDQTCSR 
CMP IDQTCSR, IDQTCSR ; 
aDOTCER, *DQTCSR : 


;CLEAR ALL THE DQ1i 

iat 0 ee TO ZERO 

Start * PILLING TX BUFFER 
ee A 4 Dosa 

COUN T PATTERN 

SET POLYNOMIAL TO 177777 

ISSUE MASTER CLEAR 


;SET CALCULATED BCC TO an 
;SET TYPE OUT ERROR REG TO 16 

TA OF BCC SIMULATOR TO ZERO 
SRITE EN TX BA PRI 


SET TX 

‘ENTER T WRITE EN ,TX CC PRI 

:SET FOR 400 CHARS’ 

sEXIT "T™ WRITE EN. TX CC SEC 
FOR ZERO CHARS ON SEC 

sSEL ohn REGISTER 


seer MISC REGISTER 
sEIGHT Bir, , TEST LOOP,AUTO STEP 


;CLOC 
' iF COUNT T 


L 
{THIS IS_THE PREVIOUS Bee CALCULATED 
RESELECT THE MISC REG ‘ 


‘eT OCK DOWNa== 
Peel THE TX x BCC REGISTER 
tSAvE IT IN TEMPY 


Bre T one eae AND RECEIVED RESULTS THE SAME?” 


;BCC(S) ARE DIFFERNT.. 
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;CLEAR THE CARRY BIT OF PSW 
005364 $$ UPDATE MY DATA LOCATION 
015330 I COUNT ;UPDATE THE COUNT OF B 1s rte CHAR 
015330 000010 ail at :1S THIS wn not Boe E YET? 


015332 j DATA 
3$ 


;BR IF_CHAR N 
ET NEW CHAR 
HAVE ALL CHARACTERS BEEN DONE 


015330 au COUNT s INIT COUNT 
000012 173672 8S: HOV #MISC. , IDQREG bi pie THE MISC REG 


LEA 
015322 CALBCC s SHIFT OUT CALCULATED BCC 
aDGSEC ‘CLOCK UP-- 
aDQSEC CLOCK DOWN--- 
173646 #16, JDOREG act TX BCC REGISTER 
001252 MOV apOSeC. TEMPY IN TEMP4 
001252 CMP CALBCC, TEMP4 


COUNT : PDATE COUNT 
015330 ae #16. , COUNT BR put, THE BCC BEEN SHIFED OUT 
173604 #MISC.,@DQREG ; SELECT THE MISC REGISTER 
INC aDGSEC GIVE ONE LAST CLOCK UP-- 
C @DGSEC SAND CLOCK 60 WN-- 
0016 173566 #16, dDQREG SEL THE i BCC REGISTER 
173564 T aDQseC DID THE TX BCC GO TO ZERO 
‘ ;8R IF GOOD 
005510 HL :TX BCC NOT ZERO 
O0S6le 104400 SCOPE TEST 


{TEST OF RECEIVER BCC 
;WITH POLYNOMIAL EQUAL TO 177777 


A FOUR HUNDRED BINARY COUNT 
;DATA PATTERN IS RUN THROUGH 
; THE B A SHIFT BY SHIFT 
THE HARDWARE COMPARE 
FTWARE. 


SO 
eee IS ONE SHARE TER TIME DELAY 
;FOR THE BCC T Bat sf 

ALSO THE IS ONE PAD CHA 

;NEEDED AT THE END OF THE DATA. 


;__TesT lo 
1 GBHBEE HEE HHHEEE HEE EHHHEHHHEE HEE HHEGHHHEEIGEEE EEE EE 
012737 OO00010 o01226 TSTIO: #10, TSTNO 
005654 O01214 M #28; RETURN 
006640 001216 MOY = #TST1I, NEXT 
1S: CLEAR THE DEVICE 
177777 015326 MOV #177777, XPOLY ; SELXPOLY 10177777 
OOSe46 001254 MOV #15, TEMPS ;SET TYPE OUT "REG 10.15 
OO5654 2$: MSTCLR SISSUE A MASTER CLEAR 





yd 
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104412 
td 


1973 O05e56 


01$322 
173472 


006144 
015316 


006146 
012042 


000012 


0 
001252 


015330 


MSTCLR 
CLR 


CALBCC 


#20, JDQREG 
SAXOUFE JOQSEC 
#121, aDOR REG 
tA, 0 

#24 SboReee 
#RXBUFE IDQSEC 
#65 SDOREG 


#MISC: , DORE 
#4012. dDQSEC 
#10001, IDQRCSR 
#8. COUNT 
pata’ TMPDAT 
TMPDAT 


TEMPS 
TMPDAT 
TEMP3 
#B1T7, dDQSEC 


 ‘TEMP3’ aDQSEC 
300 


set 


DATA TMPDAT 
MPDAT 


tALBee 95 
RS, SIMBCC 


1 

1 

tL att 
TMPDAT 

TEMPS 

#81T7, IDQSEC 


TEMP3’ JDQSEC 
apaset 


Ro 


QREG 
sDOSEC. TEMPY 
EAL sCC, TEMP4 


COUNT 
#8. , COUNT 


»SET CALBCC TO ZERO 
5 T DATA TO ZERO 

WRITE EN,RX BA PRI 
+ OAD THE RX BA 
ENTER "T" WRITE EN,RX CC FRI 
SET FOR FOUR HUNDRED CHARS 
:SEL THE RX BA SEC 
SET FOR THE PAD CHAR. 
sEXIT "T™ WRITE EN,RX CC SEC 

x ct SEC FOR ONE PAD CHAR. 
EGISTER 


;SEL THE MISC REGISTER 

EIGHT BITS TEST LOOP AND AUTO STEP 
SET RX AC AND GO!! 

; SET 4° ONE CHAR TIME DELAY 


SAVE T 
COMPLIMENT IT FOR BIT WINDOW USE. 


SSATET” OUT ONE BIT OF DATA 
; BRING IT_IN FROM CARRY 
;CLEAR THE BIT WINDO 
:PLACE DATA ON BIT WINDOW 
CLOCK UP 


SUB ROUTINE USE AREA 


;MOV DATA TO 
‘si SUBROUT IR TO ONE LESS THAT RX GETS 


;COMPLIMENT DATA FOR BIT WINDOW USE 
MOV CALCULATED BCC TO a3 tt USE 
;G0_AND CALCULATE BCC (SOF TWARE ) 
:THIS IS NUMBER OF SHIFTS TO BE DONE 
i THIS TS WHERE My | DATA IS PLACED . 

THIS IS_ WHERE THE PREVIOUS BCC IS PLACED 
SRESELECT THE MISC REGISTER 


INIT LO 

‘SHIFT OUT DATA BIT 
:CATCH IT_IN TEMPS 
;CLEAR_THE Bir WINDOW 
;LOAD THE DAT 
:CLOCK UP--- 


;CLOCK DN 
s3et RX BCC REGISTER 


T 
315 IT CORRECT?? 


GOOD 
;BCC NOT WHAT EXPECTED 
ie THE CARRY BIT 
FT 1S Oa ay 
;UPDATE THE COUN 
1S THE CHARACTER DONE?? — 





o-- 


oo »-- 
O00o0 


~ 


8 


BPR 


TUITUDO—- 0 0 = b— b—< b-- b-- b 0  — 0 =  0  e 
OO 0ODODUOOWOW.0OW 


SUD eD Bern Etat ue tee 


EOE eS 


USESESE IES 
WO NWUl.s£ tute Ow 


Oo 
0— b+ b+ b+ b= 0-2 8 8 +O + 


fat Oot th) 
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Q&C.P 
74 
75 
i 
: 
81 

2 


006264 
006266 


036620 
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015332 
000003 
bieses 


1$3ee 
12042 


01S32e 





O1S346 


06326 
15344 


172700 


172660 
172652 


7263 
goicé 
0012Se2 


015330 


015346 
O1S346 





6$ 
DATA 


cA atbec >) 
CALBCC 
RS, SIMBCC 


1 

CALBCC, SAVBCC 
STORE1. CALBCC 
#377, DATA 
gavatc, THPDAT 

TMPDAT 

SAVBCC, DATA 

SAVBCCHL, THPOAT 5 HOV 
MPDAT 


125 
SAVBCC+1, DATA 
bar? heb 


ceutea| 14S 
SIMBCC 


1 


1 
#MISC.,aDQRES 


TEMPS 
TMPDRT 


i8IT3, a0QSEC 
sacs 


aDQSE 
#15, JDOREG 

Liat, 
wae, TEMPY 


NO3. 


$ 
C,STOREL 


;BR IF CHAR NOT DONE 
;UPDATA DATA 
;8R IF NOT fit CHARS DONE. 
: POINTERS 
; SAVE cALBCC 


G0 FINISH THE BCC 
:SHIFTS REQUIRED 
DATA CHARACTER 
sPREVIOS 


VE THE BCC 
:RESTORE THE BCC 
:PUSH IN y LOW BYTE OF THE BCC 
; INT QO THE R 


MOVE THE CALBCC TO DATA FOR 

5 HOVE até eH BYTE OF OS 
R 7's BIT WINDOW 

cy 10" main PART OF 


fest 
MOVE THE HIGH BYTE OF THE CALSCC TO DATA 
sg oon ~ 


T_WINDOW 


B 
ms Count (THIS 2 oR FoR ta OF BITS PER CHAR) 
;L0 te ay FOR S 


ois Te 4 C FOR ait: VTUBROUTINE 
: THIS we RureR OFS SHIFTS TO BE DONE 
THI HAR FOR THE SUBROUTINE 


ital 18 : BRE VIOUS BCC 
sc TH THE MISC REGISTER 


Pad QUT A. BIT OF DATA 
: NG 


FROM CARRY INTC TEMPS 

HE BIT WINDOW 

te DATA ON THE BIT WINDOW 
RX C REGISTER 

a We Le 
ad tRRecT?? 

Bcc E 

ae i se TO THE RIGHT 

is “tals "CHRRACTER DONE 


ai T DONE 
SALTER THE RETURN POINTER 


WHERE SHOULD I GO? 


SIF LOC1=2 GOTO fis. 


sIF L0Cl= 1 -G0T0 16$ 

rue pono oce Terco 
‘DID. AN ERROR OCCUR?? 
:BR IF NO ERROR 



































UTINE 
© PLACED INTO THE RECEIVE 


—" 1 ari Fed 
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 RESENER AND HaNSMITTE tests PLUS BCC TESTS. 


id 


OD SOUL catue es 


CMON 


Oo 


rororururororrr:n 
cocoa@coc S38 
a WT et ete 


C2109 





BO4 


HLT 1 . 
SCOPE ; 


IS U 
ite HARDWARE TO OISC 
AN ERROR IF ONE OCCUR 








TEST 1 
 eeeeeHHHEEDELERESEEEEEHEEDOEeSEEEHEOHAHEHEREEEEEEEHOREEseeeEEEEOS 


tST11:° MOV #1). 7 we 
M Ss" 


MSTCL CLEAR OQ11 WITH @ MASTER CLEAR 

MOV #120001,xPOLY — ; LOAD SELECTED POLYNOMIAL INTO XPOLY. 
SR ec stact : TRANSFER CHARACTERS. 

MOV DOERR, ES :SAVE THE ERROR RE SISTER 

TST :DID BN ERROP OCCU 

BPL * :SR IF NO ER 

HLT : AN FoaoR 5ce ‘er 

SCOPE 


ITEST OF TRANSMITTER -_ RECEIVER 
:BCC WITH A POLYNOMIAL 

:ORC 12: xizeRLLecaneaXe] 
NOTE: rN THIS ie 1? 3 ue 

HARDWAR 15C0 over 
iON ERROR Ire one OCCURS 
TEST 12 
jesesideeseensnseseneeresnenensnepnausensnsopecsnnnnenennenene 2342 
rSTle: MOV TNO 
MOV steti3. NEXT 


MSTCLR sCLEBR Bitte WITH A MASTER CLEAR 
MOY a74Q1 XPOLY L apg yNontA L INTO XPOLY. 
JSR ¢. Stace i TRONSPER ERS. 

MOV SptERe, RS :SAVE THE ERROR REGISTER 

TST DID AN ERROR OCCLR?* 

BPL » -BR IF NO ERROR 

Lt i :AN ERROR OCCURED 

SCOPE 


ae i es AND RECEIVER 
¥ iy a POLYNOMIAL OF 

T: xigenlsen exe] 
ina AES” nN THIS TEST IT 18 UP TO 
















DaDGE 


Par = 


4 £0) 
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Ow 
OO 
oo 
80 
Mo 
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Ole73? 900013 O0L226 
Ole? OOT014 O0lels 
104412 

Oi2737 102010 015326 
oo4737 010160 

Oli rae) li? esb= 

0S705 

199001 

104001 

104400 


1573? 000014 001226 
0 01216 


412 
012737 000209 015326 
004737 


104400 


2737 ogcois 001226 


CO4 


STS PLUS BCC TESTS. 


; THE HARDWARE TO DISCOVER 
;AN ERROR IF ONE OCCURES 







- TEST 13 
Ct fay 4 “rgeander 1” nantae cement cetmetaa a cnoaesean 
$5713: PV 
V stetia. NEXT 
MSTCLR sCLEAR OG11 WITH A MASTER CLEAR 
ay #102019, XPOLY ‘SAD SELECTED POLYNOMIAL INTO XPOLY. 
JSR PC 5 TBCE ; TRANSFER CHARACTERS. 
MOV DOERR RS :SAVE THE ERROR REGISTER 
TST RS ;DID aN ERROR OCCUR’? 
SPL +4 :BR IF NO ERROR 
HLT i :AN ERROR OCCURED 
SCOPE 
STEST OF TRANSMITTER AND RECEIVER 
:BCC WITH A POLYNOMIAL 
“LRC §: X41 
OTE: IN THIS TEST IT IS UP TO 
:THE HARDWARE TO DISCOVER 
:AN ERROR IF ONE OCCURES. 
; TEST 14 


eeerierserereeerrertttreteetnreretrertretreerereretrerererereesren 
tST14: MOV #14, TSTNO 


MOV sTStisS, NEXT 
MSTCLR ;CLEAR DQ11 WITH A MASTER CLEAR 
MOY #200, XPOLY : ORO SELECTED SQLYNOMIAL INTO XPOLY. 
JSR PC Stecc : TRANSFER RS. 
MOV SDOERR, RS :SAVE THE ERROR REGISTER 
TST iio aN uePEOS OCCUR?? 
PL ~ Rit ERROR 
HL ey RROR FRC URED 
SCOPE 
“TEST OF TRANSMITTER AND RECEIVER 
BCC WITH a POLYNOMIAL OF 
“LARC 16: x14] 
sNOTE: “IN HIS afl. a 1S UP TO 
TO DISCOVER 


; THE HA 
ZAN ERROR scl ONE OCCURES 


; TEST 

jgeseheensnsnssonsassasassanonssnesas: SRERREAARAATRATRARAARAARERRA Lt2 

tST1S: MOV NO oY 
10 atetie NEXT 


MOV 
MSTCLR ;CLEAR O01) WITH A MASTER CLEAR 





D2DQE _MACY1L 
DIDGEC.P Ll 


o— 6-- =) <> 2 6-2 b+ 9-6-2 9-- 0 © 


rund 
EVO LVS LO LOTTE 


ruoruorururuororurororururororurururururururururururufururufrurururufrururururofrururururourufrororrrn ronson 
EAP Ee Se TT a ee th a 
SRR oo RR PO ad dott 2 adrde cde) SPUN Ee LurUr Ca sOtD SEU E Cohan cba ide 
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912732 409009 018326 Moy #100000, POLY 
poarse .. 010180 JSR PC, STBCE 
Diz70s " 172882 MOV 2OSERR, Rs 
0057 OS ° ST 

160091 ri ne 

194001 HL l 

104400 SCOPE 





DO4 


; LOAD PebeEC TED i a ae INTO XPOLY. 
: TRANSFER RACTERS. 

;SAVE THE ErRoR REGISTER 

;DID_AN ERROR OCCUR?” 

:BR IF_NO ERROR 


AN ERROR OCCURED 


TEST OF RECEIVER AND TRANSMITTER 
3BCC USING CRO 16 FOR POLYNOMIAL. 


THIS TEST _USES Oe . i008 TO 


GT IN INTO TRANSPA 


IF _AN ERROR SHOULD OCCUR 
y1T MUST BE REPORTED BY THE HARDWARE. 


; Test 6 
012727 0090016 001226 fSTl6: MOV 816,75 
012737 OO7164Y O01e14 MOV #2$ RETURN 
Ole737 07220 O0l2ls MOV aTST17, NEXT 
194413 MEMCLR 
905000 CLR RO 
512704 o15354 MOV WTXBUFF RY 
110924 18: MOVB =—-RO, (R44 
195200 INCB RO 
001375 BNE 1§ 
104412 2s: MSTCLR 
012737 120001 015326 MOV #120001 XPOLY. 
004537 O10546 JSR —sRS, SYNBEC 
177400 400 
177400 -400 
617705 172156 MOV TDGERR, RS 
005705 : TST = 
100003 BPL a4 
104001 HLT 
104409 SCOPE 


+ bll-Ch lt h-+ eeehaeeheeeeeeeeheei 
0 


sELERR THE DEVICE 

:SET RO TO ZERO 

;SET POINTER FOR BUFFER 

3 START rd. LING THE BUFFER 
;UPDATE T HE DATA 

HAS THE BUFFER BEEN FILLED 


;SELECT CRC 16 FOR POLYNOMIAL 

:GO PRIM THE oe 

s THIS TS THE CHARACTER COUNT FOR THE RECEIVER 
HIS IS THE CHARACTER eeuNT FOR THE TRANSMITTER 


om f ERROR DID NOT OCCUR 


THE <8 ERROR BIT IS ser 


HALT 
:SCOPE THIS T 


TEST OF TRANSMITTER AND RECEL _* 
;BCC WITH A POLYNOMIAL OF 177777 


‘THIS TEST USES IDLE a T9 


:GET INTO TRANSPAREN 





F AN 
ERROR red RAPPEN tHe HARDWARE 


TEST 
sRREREESERERALEELERERAERAAEARERE RAR SERLARELRERALRRARARARS AAA RARARAAE 


Rope MACY1L1 
C.Pll 


ya) 
ve) 


fury 


~~ 


Cc 


eee 
QBIRREGRE SES 


Urorurururufruor 
furororurorororore 


fu 
mw 


forurororurunore 
0 b+ b= Be bh bo he Bae 
WONIMULSE GITr-c 





10 
naoaie 


007434 





271732) 


es 


Tova 





000917 
007260 
007314 


015354 


177777 
b10s%% 


172062 


011066 
O1e04e 


15 
J1S322 
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‘eEere THE DEVICE 
T 58 Mi eR 


UFFER 
Sat FILLING FE BUFFER 
‘HAS THE “BErER Wk FILLED 
:SEL Leta 13552 FOR POLYNOMIAL 


THI $ 1s THe net ee COUNT FOR THE RECEIVER 
REOR REGISTER FOR THE TRANSMITTER 


;BR IF # 
;HALT THE 00 ERROR BIT IS SET 
;SCOPE THIS TEST 


TEST OF TRANSMITTER AND RECEIVER 
; OL YNOMIAL 


;SH BE _AND COMPARING IT 

;WITH THE TRANSMITTER BCC AND RECEIVER 8° 2 
1 WILL FREEZE THE POLYNOMIAL 

NS O$ IS ASSERTED. 


jREREAREEEE + EEAERREREAEARELERERSERALESEEREREREREREEEEEER EEE EERE ELE 
OV 


;INIT SET XPOLY TO ZERO 
$86 AND we: THE DQ11 

ULATE WH HAT THE BCC SHOULD BE 
FOR Of EYGHT. Bits Cen CHAR (NUMBER OF SHIFTS) 
Me 18 tHE P REVIOUS B 
:SEL ue RX BCC _REGISTER 
35 THE REGISTER 
AVE THE BCC 
S THE pce RIGHT*? 

S 


ERROR 
THE TX BCC_REGISTER 
BCC WAS STORED 











DIDIE 


MACY11 271732) 
OZDGEC.P11 


i044 


4002 
012705 





36 10440] 
aoss3> 
00134 


24 


015326 


007476 
001254 


01$322 


COO0ié . 
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001226 
001216 


001220 


001220 


015326 


171550 


FOY 


SCOP 1 ;DOES THE a sty SWO9=17? 

INC XPOLY ; UPDATE THE POLYN 

N 4 NOT ALL POLYNO HAVE SEEN DONE 
COPE iB ope THIS TEST 

‘POLY OF BIT O6_OF M REGISTER 

POLYNOMIAL 16-24 


TEST WILL SEND te ae gd AT 
3A TIME CHECKING THE BCC 

3 OF MERON eT. AND TRANSMITTER 

: CHARACTER SENT: 000-377 


; ST 21 
etttreiritiittisiiiitiitiiiiitiiiittititrittitiisitsitersrttttiiress 


tST21: MOV #21, TSTNO 
MOV #. EOP, NEXT 
PART 1 READ/ WRITE TEST OF POLY 16-24 
: TEST br ALL READ WRITE BITS IN POLY 16-24 
:BY RUNNING A BINARY *OUNT PATTERN trove 
:THE REGISTER. 
MOV #13, LOCK :SET FOR LOCK ON TEST(SWO9=1) 
CLR TEMPS :2ERO POINTER 
18: MSTCLR INIT DQLL 
MOVE antIse. DOOREG ;SEL MISC REG 
MOV #BIT6.200SEC :SEL POLY 16-24 
MOVB 817, a0QREG :SEL POLY REGISTER 
BIS temps JDGSEC :LOAD WITH CHAR. 
MOV abseC, TEMPY § :READ CHAR BACK. 
CMP TEMPS, TEMPY 21S qT ¢ CORRECT? 
BEQ +4 BR IF 
HT -6 POLY READ” MRLTE ERROR. 
SCOP! ;LOCK ON CHAR (SWO9=!) 
INCB TEMPS ‘UPDATE CHAR. 
1§ :BR IF MORE TO GO 
PART 2 RX AND TX BCC TESTS 
CLR CALBCC ;ZERO EXPECTED BCC 
MOV #2$, LOCK SET FOR SWO9=1 
23: MSTCLR : INIT Qi 
MOV #200, XPOLY : SEL “ERC 24" 
JSR PC TXBCC : GOTO UTINE 
MOV als, RS ;SEL BCC REG 
MOVB JDGREG : 
MOY spteC, RI ‘READ BCC REG. 
CMP CALBCC,R1 1S BCC CORRECT? 
BEQ +4 :BR IF GOOD. 
HLT 2 :BCC ERROR. 
MOV #16,RS SEL BCC REG. 
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013701 015340 SEC16,R1 ;GET SAVED BCC 
015322 cayact, R1 ie , sapere" 


3 

CALBCC,R4 tBAVES Ron BCC 

CALBCC’ ZERO SOFTWARE BCC 

#MISC.,SDQREG  :SEL Isc REGISTER 

u816  MDQSEC ; SEL POLY 0-15 
:SET FOR ERROR 

Re sibarec :SEL BCC REG 

aD Dose ; READ BCC 


0 
“ BR IF YES. 
e ;BCC NOT O 


#16,RS 
SEC16X,R1 
Ri 

+4 


COUNT 
“ ntsc. , DQREG 

apasec’ 

aDSEC 

COUN 

Re «aberec 
171314 aDOSEC, 
SWAB 


01 
01 015322 Gasce, »R1 


Bien irra sein ice vis 


015322 INCB  CALBCC 
BNE 2g 


8 
2REe 


01 
QO! 
Ht 
1 
01 
Qi 
Ol 
01 
_ Oi 
Oi 
Oi 
Ol 
O01 
01 
01 
01 
01 
01 
Ql 
Oi 
Oi 
01 


ong 
eb 9 


104400 


{USERS BCC Re ee TRANSMITTER TEST 
HIS TEST ALLOWS THE USER TO 
USE ANY POSSTBLE POLYNOMIAL 
HIS CHOIC 


E. 
‘THE TEST USES THAT POLYNOMIAL 
ON A FOUR HUNDRED, EIGHT BIT, BINARY COUNT 











DIDQE. _MACY11 
OZDOEC.P 11 


EC. 

2366 
2367 
S359 

36 
2370 
2371 
e372 010106 
e373 010114 
2374 O10lee 
e375 910124 
2376 010126 
e377 910130 
2378 Q1013e 
2379 010140 
2380 010144 
2381 010150 
2382 01015e 
2383 9010154 
2384 010156 
e385 
2386 





at (732) 
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012737 
012737 
104402 





: MOV 


;DATA PATTERN 
NOTE: THE BCC_OF THE TRANSMITTER oa RECEIVER 
5 BRE NgT bay Te FOR CORRECT pect 
i HARDWARE DID NO 
FLAG ANE 


#USEBCC , NEXT 
~~ #USEBCC , RETURN 


sCHECK FOR <tG> 
ASH XPOLY 
JSR ste BCL 
apte 


BPL a 
es 











st 

oe 
$ 

QONdNIVOV00000 —- 
— 0 — hh wpe 

Q 

os 

~ 


forurororore 
Rote 


Ssseso 
azIFTS 


eine 


~ 
<£ 


3 


SB se en 


ee 


& 
& 


Rae een Ee 


? 
ao 


aoa eaungay ss 


ie 
or 


OO OOO OOOO OOOO OOH OOOH OKO KOON HONDOHAOIOOVNDOODOOOVB00000 


0 + b+ b+ b+ + 0 —* 0 b= b+ 8 0 0 0 0 8 bb + bo 8 = = 9 Fb 0 2 BP bb bh hb 9 bb pp ep ee 


TARA 
ENSLVR 
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O11637 015336 STBCC: MOV (SP), SAVEPC ;SAVE PC OF ENTERING ROUTINE 
104813 NENCLR . 
612704 015354 MOV #TXBUFF RY 
110024 1S: MOVB RO, (RY) F 
105200 INCB RO 
001378 SNE 1$ 
105077 171162 CLAB  aDOREG sSELECT THE RX BA PRI.. 
012777 015756 171156 MOV #RXBUFF,SDQSEC LOAD THE RX BA 
11077? 900121 171146 MOVB #121, aDQREG j SENTER WRITE ENABLE,RX CC,PRI. 
012777 177400 171142 MOV #-400, IDQSEC ;SET ct FOR A TRANSEER OF’ 400 CHARS. 
112777 000022 171132 MOVB #22, JDQREG BETTE XEN BLE Tx BA PRI. 
012777 015352 171126 MOV #SYNC,SDQSEC ;LOAD T A 
112777 000023 171116 MOVB #23, JDQREG ‘ENTER T.WRITE ENABLE,TX CC PRI. 
012777 177776 1711le MOV #-2, JDOSEC :SET Tx tC FOR. 4 TRANSFER OF 2 CHARS. 
112777 000024 171152 MOVB 824’ JDOREG WRITE ENGEL E.R X BA SE 
005077 171100 ca CLR aDQSEC CLEAR THE RX'BA SEC 
11 000065 171070 MOVB #65, JDQREG SEXIT T WRITE ENABLE.RX CC SEC. 
012777 177777 171064 MOVR-1, abaset -SET THE RX CC SEC FOR ONE PAD CHAR. 
112777 000026 171054 ~ MOVB ° #26, JDQREG ‘WRITE ENABLE. TX BA SEC. 
012777 915354 171050 MOV STXOUEF JOQSEC 
112777 000127 171040 MOVB #127, JDOREG sEXIT T,WRITE ENABLE,TX CC SEC. 
012777 177400 171034 MOV tot DDQSEC 
112777 000011 171024 MOVB 1, JOQREG 
013777 015350 171020 MOV "eit JOOQSEC 
112777 000017 171010 MOVB 817, QDQREG 
013777 015326 171004 MOV XPOLY. aDQSEC 
112777 le 170774 MOVB - #MIS¢? aDOREG 
012777 004010 170770 MOV #4010, MDQSEC 
001244 CLR TEMP] 
005037 001246 CLR TEMPS 
012777 010462 170734 MOV - &TXISR1,9DQTVEC 
005077 170732 CLR aOQTLVL’ 
012777 O00001 170726 MOV rs 3OORCSR 
012777 000041 170724 MOV #4], aDQTCSR 
005037 177776 CLR PS 
105237 001244 23: INCE «TEMP 
001375 BNE 2s 
105237 001246 INCB ‘TEMP2 
001372 BNE 2 
104000 HLT 
022626 4.7 TXISR1: CMP (SP)+, (SP)+ 
042777 OO0040 170672 8.2 BIC #81TS: JDOTCSR 
112777 000063 170670 7.6 MOVB #63, JOQREG 
005077 170666 .« : 6.1 CLR aDQseEC 
037 o01244 3.7 CLR TEMP 
005037 00124 3.7 CLR TEMP? 
032777 O00100 170634 7:7 1S: BIT 8BITE, IDORCSR 
001007 2.6 BNE ENDect 
05237 001244 3.7 INCB = TEMP 
00137 2.6 BNE 1$ 
105237 001246 2.7 INCB = TEMP2 
001366 2.6 BNE 1$ 
104000 9:3 HLT :RX SECONDARY DONE NOT SET. 
0207 3.5 : 





ENDBCC: RTS PC 
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8 1 SYNBCC: MOV ALR RS, SAVEPC tere eR tue” omen ROUTINE 


44 
tpege- 170610 CLRB aJDOREG ; SELECT THE RX BA PRI. 
170604 M WRXBUFF,ODGSEC ;LOAD T 
170574 #121, ADOREG sHEN ER T RITE ENABLE,RX CC,PRI. 
(RS)+, IDQSEC 

170562 #22, IDQREG tERITE * EN TX BA PRI. 
170556 STXQUFF QDQSEC LOAD THE A PRI. 
17054 #123, IDWREG sENTER T WRITE ENABLE, TX CC PRI. 


M SET Tx oC 
170534 2 : WRITE ENABLE RX BA SEC. 
170530 "LOAD THE PX BA 
sEXIT T fIRITE ENABLE,RX CC SEC. 
V T FOR ONE PAD CHARACTER. 
170504 #26’ IDQREG ENABLE, TX BA SEC 
C aDasec :CL CC SEC 
170472 #67, DDQREG ‘EXIT T,WRITE ENABLE, TX CC SEC. 
C aDasec :CLEAR THE TX CC SEC’ 
#11, JDQREG 
SYNC, JDOSEC 


Ged 


stg tatatate 
Ree ous 


fasownee 


Stotaddad 


Tomo 


SIV 
RESP 


TEMP2 
170374 #3, DOORCSR 
170378 #2. JDQTCSR 
17037 : aBIT1S, aDQSEC 


BRB Nagas 


oon 
mr 
Orrco 


BNE 2g 
090001 170340 3$: #8170, IDQTCSR 
001244 TEMP 
o0090S o012%6 #5, TEMP2 
000100 170314 4S: #BITE, IDORCSR 
ENOSYN 
001244 TEMP] 


BNE 4§ 
001246 . Tgnre 


CEUSERSE 


RS ;RECEIVER DONE SECONDARY NOT SET. 


a) 
a) 
Q 
0 
1) 
4] 
0 
0 
0 
1] 
Q 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
4] 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 


$292 9-2-29-09=n9-29-2b-2-26-2§-29-b-= bd HOODOO OOOOODODCDODODCOOCe 


b+ b+ 6-4 > b- 2 = * bb + b— 0 be bo 


e 


015336 : MO (SP), SAVEPC :SAVE PC OF ENTERING ROUTINE 
M ;CLEAR THE DQ11 


000351 015354 OV #351, TXBUFF 
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012737 000011 015330 MOV #9. , COUNT 
1S: IDORE SELECT T THE RX RX BA PRI. 
170244 #RXBUFF , DQSEC 
#121, DDOREG : ¥ENTER I (PLE, ENABLE RX CC,PRI. 
re RX tA a Se? 1 CHARACTER. 
ITE cia, 


ENTER He were "ENABLE TX CC PRI. 
0 SET Tx tc FOR 6 RANSEER OF 1 CHARACTER. 
170170 ‘WRITE ENABLER X BA 


JDQSEC :C cn 
170156 #65, JDQREG sexRL TARTS ane »RX CC SEC. 
170144 #26, JDQREG WRITE ENABLE, TX BA SEC. 
;CLEAR THE TX E 
170132 3 See sEXIT T,WRITE ENABLE,TX CC SEC. 


i C ; CLEAR THE TX CC SEC 
17 “170120 #17, JDQREG . 
XPOLY, » SDQSEC 


CRUTUTUN OUI URURUTUTUTONUTUTON 
PU wo NOE eter O 


CMP a ; 
170042 ' QDQTCSR; ADQTCSR ; 
aDQSEC ;PRIM TH 
ANSMITTER. 


aDQSEC 
170032 #BIT7,aDQSEC  _— s; CLEAR THE att WINDOW. 
170012 #10001, JDARCSR 
167776 


615330 


Q 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
a] 
0 
Q 
0 
Q 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 


he be bs Be he ho hs he a eb be hh be 0 bo be bb 0 pe 


015336 : V (SP), SAVEPC ; SAVE gt i ROUTINE 


CLEAR T 

015322 354 MOV CALBCC, TXBUFF 
000011 ae #9. . COUNT 
te 7Oe : JDOREG ;SELECT THE RX BA PRI. 
015756 167702 wRXBUFF IDQSEC iLO OAD T g 
bogie #121 abOREG ENTER WRITE ENABLE .RX CC,PRI. 

et #-I, soe *SET RX CC FOR A TR RANSEER OF’ 1 CHARACTER. 
soogee 187656 #22, SDOREG BRITE XENBBLE. TX BA P 


ONdKdOO0O00NO0 
Cn ee ee ee ee ee en 
a oo 











DZDGE metas 271732) 
OZDQEC.P 


e557 012777 015354 16765 


167626 
46 112777 OO006S 167614 
112777 000026 167602 
167570 
167556 


ON0000000 


once 
5 
3 


SIERO 
2 


167462 
167442 


167430 


C15330 


015330 


2000000090909 009090290900000000000000 
iat) tJ 
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es: 


bes,aothee 


$24 sbGseC 
aDQSEC 
#65, JOQREG 
DaSEC 
#26, JDQREG 


¢ 
#67, DDQREG 
aDasec 
#MISC. , IDQREG 
#4112. MDQSEC 


#17 SOGREG 
XPOLY a 


R . 
DDQTCSR, ADTCSR ; 
@DQSEC ; 


JDQSEC 
#8177, JDQSEC 
#10 #10001, JDQRCSR 
sbase< 


- 
#8176, DQSEC 
#16, JDQRE 
aDgBEC, SEC16X 
#MISC.  DDOREG 
#8176 “ MDQSEC 


LOY 






ieee” THE TX BAF RI. 
TERT aHRIT ENABLE. TX CC PRI. 

c FOR, ; TRA NOFER OF 1 CHARACTER. 
tPRITE ae F X BAS 

‘CLEAR THE RX 
sEXIT T HRT TE ENABLE , RX CC SEC. 


RITE ENRELE, TX BA SEC. 
:CLEAR THE TX CC SEC 
‘EXIT T,WRITE ENABLE, TX CC SEC. 
:CLEAR THE TX CC SEC’ 


:SET TRANSMITTER GO 
TIME. 


TRANSMITTER. 
: CLEAR THE BIT WINDOW. 
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BLOCK CHECK CHARACTER GENERATOR SIMULATOR. 


001244 =  ——-SIMBCC: Mov (RS)+, TEMP1 
SEMA te MOV (R5)+, TEMPS 
(RS)+, TEMPS 
CFBK 
TEMP3, RO 
001246 TENPe 
000001 #BIT0,RO 


915324 BCCFBK 
015326 ; XPOLY, RO 
015324 RO, BCCFBK 
001250 TEMP3 
015324 BCCFBK, RO 
001e2s0 TENES.Ri 


Pet} 
<= 
o 


——e— 
oO 
RE a 


1$: 


O00000 
Oo 


ob + — b= 6 — 0 bb 6 = 0 bb bP 8 = 0 2 br pb pr 


VESRRS INES 


m™M 
rT 


BIC R1'RO 
015324 BCCFBK,R2 
015326 001250 XPOLY, TEMP 
001250 BIS. _—sRO, TEMPS 
001244 DEC TEMP 


1$ 
001250 015322 MOV es 


AN testeattfesteat ite 


.MEMCLR: 
167154 C JDQRCSR 
JDQTCSR 
JDGERR 
V #16. RS 
167142 1S: #B1T4, JDQREG 
167134 #140, JDQREG 
aDOSEC 
167124 JDQREG 
RS 
167114 JOGREG 
JODORCSH 
#16. RS 
167076 2S: #10. IDQREG 
167064 #14. JDQREG 
L aDaSeC 
167046 JDQRCSH 
E RS 


] 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

1] 

0 

0 

1] 

0 
Ole 
0 
Ole 
0 
O01 
0 
Ole 
0 
O01 
Ole 
0 
Ole 
0 
Ql 


ee, 2g 
167036 JDQRCSH 
-MSTCLR: 
900012 167036 MOV #MISC. , IDOREG 
000040 167032 #BITS, MDGSEC 








2689 


DZD0EC.P11 
012340 000002 


KER 
ERS 
te 


eR 


yey yyy yy 
£mo 


ig 


> 9 b-+> + 0- +e +0 0-0» +6 = 0-0-0 -- 0+ &— = b+ 0 Fb & — 0 0 8 0 


DO VOOOKOCOOOOOVOOVOOOVOOVOOOOOVVOOBDVOOODOKOO0N00000000 
SSM NNT ye oDnah rh ahy 
uli <£ * 
ot NRA SE an aray 


—- ie 
ww 
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MISC. RECEIVER AND TRANSNITIER TESTS PLUS BCC TESTS. 


905037 
005037 


Z 


8 
-_ 
ow 


001234 
001312 
001230 


aa 
eae 001276 


oo22es4 001214 


00ceS4 


EOP: 


LOGICAL: 


Ril 


+ PEON PAS 


NAME OF 
UPDATE PASS COUNT 
: CHECK For ee! TO ACT-11 


at 


RESTART T 


CLR 


.BYTE 
pones 


.BYTE 
PASCNT 


LSTERR 


PASCNT, JLIGHTS 


PC, (R1) 


#TST1,RETURN 
TSTl 


6,2 


3,2 


NO4. 









;CLEAR LAST ERROR PC 
:CLEAR ERROR FLAG 
UPDATE PASS COUNT 






;DISPLAY PASS COUNT 


;CHECK FOR ACT-ii OR DOP 
:IF NOT, CONTINUE TESTING 





<< 
o- 


~~ 


al 
. 


s 


vu 
«3 
-- 
= 
. 
“oO 


o- 


iM 
1 
Q 
hl 
2) 


PesFertentey 
ee | 
0-0 -0-- o- 
Curtestey 
avn 
festutes 
O° 40s 


3 
ee ee ee ee 


] 
uw 


UNE £ E03u} 


3-3-3" 5 
SRrEHORDN 


4 
TUTTI 6 -r—0-- 


CJT C.00) MN U1 Gate 


Tal 
o 


rurururururorurorore 


BOIS 
z 


oY 


NOOVVIOVOOVOIOVOVOOVVIOWO0Ok 
fru 


te 
Le 


u 


Sit bet De bee ee | 
~ 
SSS SS BASS VSS SSS ssa 
AR at 


RPS 
. wor 


333° 
+4 
oO 


x FET rrrrrury 
ad 


ite as 


CoOoow 
00-20 0-9 -- 
Ht 


ruru 
Bi 


OOOOOOOVOOVOOoOOONIOOAE 
m 


C02 


O40000 


166434 
166430 
004900 
001224 


3?. 
. OOl2e4 


001096 
001220 


000932 
009002 
014352 


610090 


lebe64 
000915 
166250 
900012 
l66234 
166230 


“: 
overee | 


166440 


166412 


O0l22¢ 


166326 


o0co 


166266 


1e625¢ 


les242 


. SCOPE: en 
TTST; 8&0 


. SCOP1: “a 


TYPE: MOY RS 





BOS 


13:14 PAGE S4 
TINE 


XERR: = 1 


BYTE. 6,2 
ERRCNT _. 


;SCOPE LOOP AND INTERATION HANDLER 
ag1T14, aSWR 
1$ 


3$ 
TST as 
MOV aTKDBR, RO 


8 
1§: SIT sSW11, ISWR 
23 


LPECNT . 
<p LPCNT, ICOUNT 
35 


| E 
23: CLAS  ERRFLG 


LPCNT 
MOV #9. ICOUNT 
MOV NEXT RETURN 


38: MOV RETURN, (SP) 


BRW: 1407 
QRXx: 432 


#SWO09, JSWR 
MOV LOCK, (SP) 


18: RTI 


AD 8 
18: sey SEARLS 


SNE 300$ 
SIT #SWl2, ISWA 
BNE 33 
2008: 1376 (RS) 
¥ 8 Soccer 
SFL 4 
MOV $15,Q1POER 
iste ore 5 
- mm sl2,aTPOSR 
2s: TS's aTPCSR 
BPL 


2$ 
MOV (RS) +, STPOSR 


+ ee ee = ee ee -eeee 








COS | | 
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' 
001345 BNE 18 
012805 38: MOV ($P)+,85 
o0000e RTI 
ae ASCII STRING INPUT ROUTINE 
ee 12770 01034 JINSTR: MOV RB, - (SP) 
ev?7a. Ole77e O1044s MOV RY = SP) 
2774 012774 017637 0900004 013012 Moy ss 4 SP) MSG 
e775 913002 O6e766 000002 OccocoY = AOD 82,4<SP) 
er7& 913010 104402 INSTL: TYPE 
erve 13012 300900 MSG: 
2778 013019 512704 015144 MOV ss BINBUF , RY 
e773 613020 018703 900007 MOV. 87, R3 
2780 013084 105777 166154 18: TSTB = ATKCSR 
2781 913030 100375 ‘BRL 
2782 01303 117714 166150 MOVB J TKDBR, (RY) 
e783 913036 142714 000200 BIc8 = #200, (RY) 
2784 013042 lel4e7 000025 CMPB (RY) #25 25 IT <t@ 
2785 013046 051003 BNE 2008 7 
2785 013050 104402 014532 TYPE, MCRLF 
2787 013054 000755 BR . INSTI 
e788 013086 e242? o00015 200: CMPB (R4Y)+, 815 
2789 913062 O01423 5EQ_ —sINSTR 
2750 913064 17777 166116 186120 _ MOV8  STKDBR, JTPOBR 
2781 913072 105777 166ile 2$:  §TSTB  gTPCSR 
2732 013076 190375 BPL 
2783 613100 005302 DEC CO séR 
2794 913102 901350 BNE g 
2735 613104 00402 3R iNSTG 
279% 013108 310346 JINSTE: MOV RG, =( SPD 
2757 O13119 c1d446 ~ MOV RY, (SP) 
e738 Giulle 104age INSTG: TYPE 
27939 013114 O14526 MoM 
2200 O1311¢ 005737 014352 TST § @aROSW 
2601 O13le2 00140? , BEQ ——_-400 
gebe Qizics 08402 O1NS22 7 TYPE, MCRLF 
2893 913130 0007 4003: Bi . INST 
2804 013132 012604 INSTR2: MO\ (SP)+,R4 
2805 913134 012603 MOV (5P)+:R3 
gee Cizize 00000 | RTI 
| cone ;CONVERT ASCII STRING TO OCTAL 
| 2810 915140 o19s4s PARAM: MOV = RE, - (SP) 
221i O13142 ‘C1d446 MOV RY SP) 
2812 S13i4s Cl6s05 900004 Mov =e 
2213 913150 012537 013345 . MOV <OLIM 
| g614 O13154 012537 013346 MOV HILIM | 
2815 O13160 912537 913350 MOV ( — , DEVAD ‘ 
| cei O12iS4 11237 01 33b¢ MQ (RS»+,LOBITS 
cei? Oizi20 Misha” O13363 MOV (RS) +! ADRCNT 
2618 013174 O10566 000004 MOV 5, 4(5P) 
2819 013200 005005 PARAMI: CLR RS : 
2620 013602 016704 915144 MOV = BINBUF RY 
282: O13206 126714 000015 CMPS #15, (R4) 
| 








DIOQE MACYI1 271732) 24-MAY-76 13:14 


DIOGEC.Pil 


ju 


IGS 
fufur+— 


fofufurore 
wo cfu 


ie) 


ro 
Pr So 


ure 


io) 


iF: 
ru 


fv 
w 


YQOOAOOOOVVWOVOVWVOOOL OO 
of 


0 + 0 b= 9 —« b-< bb ~+ 0 62 = b= fb 9 ho 


fury 
nid 


Loe | oe] os | ae | a | oe 
b= pp 
Biskshite 
b=9-2 ’ 

cs 's2 


3 fatatrtata tity 
Be uaa saesniniai tate 


OOMOVOOMO0OO000O 
Pat At 


o—- b-+ © -+ & + = &< & + & + 6 & -2 Bo He 


GIO Ils 
Ww) 


PAGE S& 
GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.) 
oor ise BEQ PARERR 


:TEST TO SES I# NUMBER IS WITHIN LIMITS 


;SAVE PC OF TEST THAT FAILED AND RO-RS 


21427 00080 1$: Ct B = (RY). #60 
002415 “4 BLT = PARERR 
12142? oo0087 CMPB sé RY), #67 

3012 SGT PARERR 
142714 o00060 BIC #60, (RY) 
1se403 Sisg) | (RYS+. PS 
leeTl4 oocols CMPB WIS, (RE 
O014!4 SEQ LIMtTS 
O063C5 ASL 
096305 ASL RS 
306275 asL RS 
596768 3R 18 
122714 900015 PARERR: CMPB #15, (R4) 
001003 i BNE 1208 
696727 014252 TST 38ROSW 
001023 SNE PARTI 
104404 120$:  INSTER 

O742 OR PARAM! 
020537 013346 LIMITS: CMP RS HILIM 
1013€5 SHI PARERR 
020537 013244 CMP RS. LOLIM 
103762 BLO PARERR 
133705 013352 BITB LOBITS,RS 
591357 BNE BARERR 

:STORE NUMBER 
013704 013350 MOV DEVADR, R4 
010524 18: MOV RS, (RY) + 
N6e705 ooo000> ADC 82. R5 
105337 013363- OECB = ADRCNT 

137 BNE 1$ 

12604 PARTI: MOV (SP)+,R4 
012605 MOV (5P)+'RS 
gooone RTI 
909000 LOLIM: 9 
990000 HILIM: Q 
908000 D : Q 
990090 LOBITS: 9 
013363 ADRCNTSLOBITS+1 
016637 OO00GS4 001274 .SAVOS: MOV 4 (SP), SAVPC 

:SAVE RO-RS 
010537 991270 svos: Mov RS, SAVES 
010437 001266 MOV RY; SAVRY 
019337 O01e¢4 MOV R3,f9VR3 
610237 7Slebe MOV Re. SAVR2 
610!37 Gdie6o MOV RI; SAYRI 


;2S CKSWR ROUTINE BEING USED 


~ SPECIFIED ADORESS 
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» 2 
Qis4le 


Seve einy 
E52 vNS 


ONN0Dd000 


iat ae date 


RARE bee eee eee 
Braet 


PReMiMaasees 


ataty tatty 
VoL 


23 


it 


BNOO0O1 1 ONNO OOOVOOOOVOVOOVDOOVOVANVOVOVOKONOKONO0000 
Ww 
oo 


0 b= b= b= 0 be 0 = 2 Bo bo 0 0 he 2 = Bo 2 2 2 8-2 2 2 BF bb bo bo 0 bh oe 


hon 
28 


010037 
000002 


i 


= B01 
y= 
o 


= 0 0 0 
Bape? 
ores e 


a 


overeat cree eeee, 
seencauaues 


104402 
015250 





ELS 
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001256 


a 
001 


l 

l 
pt 
Ol 
001 


i 
262 
: 


64 
66 
70 


States: 
eats tatts 
foorre 


= 
rates 
HOR 


—- OCODOOO 


015250 
013670 
013671 


000040 
013671 


001250 
900012 


MOV RO, SAVRO 
RTI 


;RESTORE RO-RS 


eRESOS: MOV AVRO, RO 
MOV AVRI'RI 
MOV SAVRe. Re 
MOV AVR3,R3 
MO AVRY'RY 
MOV SAVRS.RS 
RTI 
;CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER 
.CONVR: ~*YPE 
niCRLFE 
.CNVRT: MOV RO,-(SP) 
MOV R1,-(SP) 
MOV R3,-(5P) 
MOV RY’ -(SP) 
MOV RS|-(5P) 
MOV a12(SP),R1 
MOV TEMP, TEMPS 
ADD #2, 12(5P) 
MOV (RL )+, WROCNT 
18: MOVB = (R1)+, CHRCNT 
MOVE = (R1) +, SPACNT 
‘ MOV (R1)4, BINWRD 
2 MOV BINWRD: RY 
MOVB = CHRCNT._RS 
MOV STEMP RO 
3$: MOV RY, R32 
BIC $177770,R3 
ADD #060,23 
MOVE  R3, (RO)+ 
CLC 
ROR RY 
CLC 
ROP RY 
CLC 
ROR RY 
DEC RS 
BNE 3$ 
MOV #MDATA, R3 
4: MOVB (RO), {R3}¢ 
DECB = CHRCNT 
BNE 4 
STB  SPACNT 
BEQ 
S$: MOVB #040, (R3)+ 
DECB PAChT 
BNE 
6S: CLRB ss (R33) 
TYPE 
MDATA 
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013666 
001eS¢ 


00000e 
900000 


177001 
091314 
o000c0 


01¢6000 
165244 


000207 
029000 


001234 


001234 
O0isle 


co0o0e 


014150 


01S206 


165242 


DEC WROCNT 
BNE 2 
rey MP3, TEMP 
MOV (SP)+, 
MOV (SP)+,R4 
MOV (SP)+,R3 
MOV (SP)+,R1 
MOV (5P)+'RO 
RTI 

WROCNT: 


CHRCNT: 
SPACNT=CHRCNT+1 
BINWRD: 0 


; TRAP pisPared SERVICE 

SARGUMENT OF TRAP IS EXTRACTED 

AND USED AS OFFSET TO OBTAIN POINTER 
TO SELECTED SUBROUTINE 


. .TRPSR: MOV (SP), -(SP) 
SUB #2, (SP) 
MOV ash), (SP) 

TRPOK: ASL (SP) 
BIC #17700. , (SP) 
ADD #. TRPTAB, (SP) 
MOV a(SP) cee) 
IMP SP)+ 
sERROR HANDLER 

HLT: CKSWR 
BIT #SW1l2, ISWR 
BEQ XBX 
TSTB = ATPCSR 
BPL X 


x 
MOVB #207, JTPDBR 
XBX: BIT #SW13, ISWR 


CMP (SP), LSTERR 


BEQ 1 
MOV (SP), LSTERR 
CLRB  ERRFLG 

1$: SAVOS 
MOV <sP) RS 
SUB RS 
MOV Res RY 
ASL 
ADD (RS), RY 
ASL RY 
BIC #177001,R4 
ADD #. ERRTAB, RY 
MOV (RM) +, BRRNSG 
MG! (R4)+’ DATAHD 
MOV (R4) , DATABP 
TSTB —s ERRFLG 
BEQ TYPMSG 
TST DATABP 





FOS 





pe 3 PC OF RETURN 
=PC OF TRAP 


{MULTIPLY Ma ARG BY @ 
;CLEAR UNWANTED BITS 
: POINTER "0 SUBROUTINE ADDRESS 
;SUBROUTINE ADDRESS - 
G0 TO SUBROUTINE 








eielete! 


tetas 


sisistotsinteteiots 
00 IOU1-£ GIT Ow 


ists 
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Biused 


014256 
014256 
14264 
14265 
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GENERAL UTILITIES (TYPE OUT,ERROR, SCOPE,ETC. ) 


001027 
104402 


177 777 
014124 


014136 


014150 


165020 


cooon2 


O01e 
0004 


002000 
001216 
001200 
164754 

052 


002 


014270 


001312 


164770 
164760 


001214 


ococe4 


BNE TYPDAT 
TYPMSG: TYPE 
MTSTN 
CNVRT 
XTSTN 
YPE 
MERRPC 
CNVRT 
ERTABO 
TYPE 
MCRLF 
MOVB = #-1, ERRFLG 
TST ERRMSG 
BEQ WRKO.FM 
TYPE 
ERRMSG: 0 
WRKO.FM: 
TST DATAHD 
EQ TYPDAT 
_ TYPE 
DATAHD: 0 
TYPDAT: TST DATABP 
BEQ RESREG 
CONVRT 
DATABP: O 
RESREG: RESOS 
HALTS: TST JSWR 
PL EXITER 
PUSHRO 
OV 2(SP),RO 
ALT 
POPRO 
EXITER: CKSWR 
INC ERRCNT 
BIT #SWO8, ISWR 
BNE 1$ 
B17 #SW10, ISWR 
BEQ 2 
MOV NEXT, RETURN 
13: MOV #STACK, SP 
MP ORE TURN 
es: RTI 
ERTABO: 1 
-BYTE 6,2 
SAVPC 
XTSTN: 
-evTE 3,2 
sENTER HERE ON POWER FAILURE 
.PFAIL: 





MOV 
HALT 


#RESTART, 24 





;SET_UP FOR POWER UP TRAP 
HALT ON POWER DOWN NORMAL 
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Bisa? 


C0S037 


24-MAY-76 13:14 


RESTAR: 
OL eRe ocooe4 
015206 
015206 
001312 
001234 
164650 
PF TAB: 
ode .BYTE 
ooo042 . CKSWR: 
000176 001200 
164606 
164602 013012 
177600 013012 
009007 Cl130le 
014502 
014352 .CNTLU: 
014506 
014474 
014515 
001 .BYTE 
014532 
014352 OUT: 
‘SWREGC: 
002 BYTE 


000107 SCNTG: 
OSile7 020075 SMSWR: 








HOS 


;PROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED 


MOV #.PFAIL, 24 :SET UP FOR POWER FAILURE 
MOV aSTACK, SP 
CLR TEMP 

INC 

BNE 4 

TYPE 

MPFAIL 

CNVRT 

PFTAB 

CLR ERRFLG 
CLR LSTERR 
MSTCLR 

MEMCLR 

INP JRETURN 
3,2 

TSTNO 


; CHECK SUITCH REGISTER ROUTINE. CHECKS FOR *G TO ALLOW CHANGING ° 
“LOCATIONS USED: 
: -WORD OQ 


ROSW 

TST ae4e2 

BNE OUT 

CMP #SWREG, SWR :SOFTWARE SWITCH REGISTER PRESENT 
BNE OUT :N T T 
TSTB OTKCSR ;YES, WA FOR 
BPL REA BBY “Ger CHARACTER 
MOV SU KDBR .MSG SAND STRIP 

BIC #177600, .MSG §: THE ~GARBA oo 
CMPB sé? :1S 17 a «te 
BNE Sut e 

TYPE, SCNTG 

Con Q#RDSW 

YPE, SMSWR 

ewet, SWREGC 

INSTR, SMNEW 
PARAM’ 

177777 

SWREG , 

TYPE, MCRLF 

CLR aaROSW 

RTI 

1 

6,2 

SWREG 

ASCIZ <377)7tG/ 


"ASCIZ <¢377>/SWR= / 
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3102 014514 900 
3103 O1451S O40 O47040 OS3S0S SNNEW: .ASCIZ / NEW= / 
104 O14S22 020075 000 
105 O14 EVEN 
108 O14526 O200490 000077 MOM: = .ASCIZ. 7 _2/ : 
3107. O1453e 0003 MCRLF: ASCIZ <377) 
3108 014534 050377 051127 043040 MPFAIL: :ASCIZ «377>/PWR FAILED. RESTART AT TEST / 
3109 14542 O44501 042514 02710 | 
3119 O14550 051040 051505 o405c4 . 
3111 O14556 O5el2e O40440 O20104 
3112 14564 O42S24 OSe123 OO0040 . 
3113 O14572 O42777 O4Sl16 OSOO4O MEPASS: .ASCIZ <377>/END PASS DZDOE / 
3114 014600 051501 020123 055104 
3115 14605 050504 020105 000040 
3116 O14614 051377 oO MR: .ASCIZ <3779/R/ 
3117 O14817 377 051120 049517 MERRe: ‘ASCIZ <377>/PROGRAM INDICATES NO DEVICES PRESENT. / 
3118 O14624 o40522 O20115 O47111 
3119 014832 O44504 040503 OY¥eSo4 
3120 O14640 020123 047516 O4e040 
3121 014646 053105 041511 051505 
3122 O14854 0500 e522 042523 
3le3 01466 O52116 00005 
3124 014666 044777 051516 043125 MERR3: .ASCIZ <377)/INSUFFICIENT DATA!/ 
3125 014674 O44S06 044503 0471 
3126 O14702 020124 o40s24 
3127 014710 
3128 O14712 052377 OS1SOS 020124 MTSTPC: .ASCIZ <377>/TEST PC-/ 
3129 14720 o41520 900055 
3130 914724 77 Q41517 O20113 MLOCK: .ASCIZ (377>/LOCK ON SELECTED TEST/ 
3131 014732 047117 051440 O46! 
3132 014740 O41505 42524 020104 
3133 014746 052123 000 | 
3134 014753 103 051123 020072 MCSRX: .ASCIZ /CSR: / 
3135 014760 . O00 
3136 014761 125 O41S0S 020072 MVECX: .ASCIZ /VEC: / 
3137 014765 000 
3138 014767 120 O5S1S01 C42523 MPASSX: .ASCIZ /PASSES: / 
3139 014774 oO3Sle3 000040 
3140 O15000 051105 O47S522 OS1S22 MERRX: .ASCIZ /ERRORS: / 
3141 015005 20072 000 
3142 015011 3 377 OSISOS MTSTN: .ASCIZ (377><377> /TEST NO: / 
3143 015016 020124 047516 20072 : 
3144 015024 O00 . 
3145 015025 377 O42523 020124 MNEW: .ASCIZ <377>/SET SWITCH REG TO DO11'S DESIRED ACTIVE / - 
3146 015032 053523 052111 O44I0 
3147 015040 051040 05204 
3148 015046 020117 OS0504 030461 
3149 O1505" 51447 o42040 051505 
3150 D150" 351111 O4210S 040440 
3151 0150: 352103 OS3111 027105 
3152 01507 ~ 0 
3153 015077 __ 120 035103 OODDYO MERRPC: .ASCIZ /PC: / 
3154 015104 046777 050101 O4744O XHEAD: ‘ASCIZ <377)/MAP OF DOLL STATUS/<377> 
3155 O15112 020106 050504 030461 
3156 015120 051440 40524 0525 
3157 015126 177523 000 
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015132 
000002 : 
003 BYTE 6,3 


006 
001244 l 
06 002 BY 6,2 


001246 


moo ere 


;BUFFERS FOR INPUT-OUTPUT 


> 0 -- bb ~ b- 2 - 8 & 2 bo 


000000 
01S3le 
000010 
000351 
000000 
000000 
000000 


toeses 

ere ans 

w£crm 
MoO 
-~ 


Saou 


Bue 


£ 
iat) 
OOOOOOCO OOOO 00OWr 


CNODKGOKCOVBDOD0000000 
bee cover varverbar ver varnerarneaterpeaververtarneys 
Gw 


oOo oo 
= & ian 
GJ 

a wa 
oO 


Bee 


-BYTE 26,26 
-BYTE 26,26 
=. +400 


=.+400 


SESRRLGGLSSSIRRE SV ssc san SosaRncoec sae os 


rat) 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
2 
3 
3 
3 
3 


> b— b= 6 bb bb + 8 0 0 2 bs 0 0 0 0 bo bh = 2 ob bh bs bo 9 he 


recat 
BeRRe 












OZDQE_ = MACYI1 
DZDQEC.P11 
3214 16422 
3215 Q164e4 
3216 016426 
321? 016430 
Bt He 
1 164 
ef tins 
ee 
016605 
pies 
16700 
016715 
teeta 
16765 
ae 
ate 
017177 
He e4 
17266 
017316 
3222 017320 
3223 Q173ee 
see4 0173e4 
geeS 017326 
3226 017330 
see? 017332 
3228 017334 
3229 017336 
3230 017340 
3e31 Qi734e 
ge32 017344 
2233 017346 
3234 017350 
3235 017352 
2236 017354 
3e37 017356 
3238 017360 
32339 017362 
3240 017364 
3241 017366 
se4e 017370 
3e43 917372 
3244 017374 
3e4S 917376 
3e4%6 017400 
se47 017402 
3e48 017404 
3e49 017406 
3250 017410 
3e51 0174 
geSe 9174 
0174 
01 
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GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC. ) 


o4 013 
016634 EM] 
017224 DHS :HALT 6 
017434 OTS 
big? ay 
1726 H sHALT 7 
017456 DT 
050377 ges 951501 MPOLY: .ASC } (377) /PLEA SEI Sine REGISTER TO POLYNOMIAL YOU DESIRE / 
377 047504 04104 ASC 77>/T0 BE PLACED INTO POLYNOMIAL REGISTER OF DQ11./ 
377 040503 041514 EMO: .ASCIZ (377) “CALCULATED § 
777 O4650S OS1117 EMI: "ASCIZ <377>/MEMORY TRA NFER FRR “sparta ERROR#/ 
941777 041101 O42514 ENe: "ASCIZ <377>/CABLE TEST 
377 OSOSO4 O30461 EM3: "ASCIZ <377>/DQ11 ERROR FLAG SET’ 
050377 046117 047131 OHO: -ASCIE < <377)/POLYNOMIAL —_DQERR/ 
050377 046117 047131 ODHI: [ASCIZ <377>/POLYNO EXPECTED RECEIVED SEC. REG/ 
050377 046117 047131 Dke: .ASCIZ <377>/POLYNO CHAR SHIFTS EXPECTED RECEIVED REG/ 
042101 051104 DH3: .ASCIZ <377>/ADDRESS EXPECTED FOUND / 
042377 Ose Ol G20 OH4: “ASCII <377>/DATA COMPARISON ERROR 
2% OS a4 2 el HS rade (S00) AY BBD OR RX ABO. ESPECTED FOUND / 
pases pert G3 10) He: Beets 355} hare DQTCSR DGERR / 
ooo002 OT0: 2 
006 007 “BYTE 6,7 
015326 i. XPOLY 
006 001 .BYTE 6,1 
001270 SAVRS 
000604 oT1: 4 
O06 003 -BYTE 6,3 
015326 XPOLY 
006 oos .BYTE 6,5 
015322 CALBCC 
006 005 .BYTE 6,5 
001260 SAVRI 
oo2 001 .BYTE 2,1 
001270 SAVRS 
000506 DTe: 6 
006 002 “BYTE 6,2 
015326 XPOLY 
003 003 .BYTE 3,3 
015332 DATA 
002 006 .BYTE 2.6 
015330" COUNT 
006 004 -BYTE 6,4 
015322 CALBCC 
006 004 -BYTE 6,4 
001252 - TEMPY 
doe 002 .BYTE 2.2 
001254 TEMPS 
000003 073: 3 
006 003 .BYTE 6,3 
001256 SAVRO 
006 004 “BYTE 6,4 
001254 TEMPS 
006 002 .BYTE 6,2 
001252 TEMPY 
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ooooge 


LOS 











DT4: 2 
.BYTE 6,4 
TEMPS 
.BYTE 6.2 
TEMP4 
OTS: 


DTé: 








NOS. 


OZDQE MACYL1 271732) 24-MAY-76 13:14 PAGE 67 
DZDQEC.P1l SYMBOL TABLE 





TRPOK 013706 TSTS OO44SE TYPMSG 014062 E = 000023 -INST1 913010 
TSTNO peices TST6 005090 USEBCC 010106 SMNEW 014515 -MEMCL Qi2206 
02254 TST? Q05106 VECMAP QO000S6 SMSWR 014506 MSG Q130le 
TST19 8 614 pieadg WORD 0477 3 = aye -MSTCL pie3e4 
TST12 06704 TxBA.S= 000005 ROLF OL413e BEGIN” 02116 "PAIL 142s 
TST Ed C Biase XBX Bava . CKSWR Br aaee “RESOS Biaaid 
TST14 §=©007014 354 XCSR 012500 -CNTLU 014430 -SAVOS 013354 
TST1S 007060 TXISR1 010462 XERR 012eSee -CNVRT Q134Se -SCOPE 012530 
TST1§ 907124 TXWC.P= 000003 XHEAD 015104 -CONVR Q13446 -SCOP1 Qicb4e 
TST1? 7220 XWC.S= 000007 XPASS = Q1e514 EOP Oleste -START OO1Sle 
002646 TX.BCC= 000016 Y OQ1S3c6 -ERRTA 916360 SYNC Q15350 
TsTe0 097314 . TX.MUX= 000013 XSTATO O15132 -HLT 01372 TRPSR 013674 
TSTel  O07450 TYBCC. O11066 014250 -INSTE 013106 RPTA O01 
TST3 003226 TYPDAT 014140 XVEC 012506 - INSTG Bibs TYPE pi SbbE 
TST 003520 TYPE = 104402 SCNTG O1450e -INSTR Qle?7?7 = 01 






ERRORS DETECTED: 0 
DEFAULT GLOBALS GENERATED: 0 


*TUKE : DZDGEC ,DZDGEC/SOL+UNIV.LIB,OZDQEC.F11 
RUN-TIME: 19 30 1 SECONDS 

RUN-TIME RATIO: 1137315828 

CORE USED: 19K (37 PAGES) 
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